clear
% Tund nr. 9, ülesanne 5

% andmed
x=[1.2:0.1:2];
y=[9.08,10.43,11.9,13.48,15.19,17.03,19.01,21.13,23.39];

% teeme joonise
plot(x,y,'o')
hold on
xvork=[1.2:0.01:2];
%a) lähendame andmeid kuupsplainiga
ykuupsplainiga=interp1(x,y,xvork,'spline');
plot(xvork,ykuupsplainiga,'r')
hold on
%b) lähendame andmeid kuupfunktsiooniga vähimruutude mõttes
kordajad=polyfit(x,y,3);
yvaartused=polyval(kordajad,xvork);
plot(xvork,yvaartused,'b')
hold off

%c) leiame funktsiooni väärtused x=1.12 ja x=1.35 korral 
ysplainiga=interp1(x,y,1.12,'spline')
ykuupfunktsiooniga=polyval(kordajad,1.12)
