clear
% Tund nr. 9, ülesanne 4

% esitame lähteandmed
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

%a) lähendame lähteandmeid kuupsplainiga
xvork=[1.2:0.1:2];
ysplainiga=interp1(x,y,xvork,'spline');
plot(xvork,ysplainiga,'g')
hold on
%b) lähendame andmeid kuupfunktsiooniga vähimruutude mõttes
kordajad=polyfit(x,y,3);
ykuupf=polyval(kordajad,xvork);
plot(xvork,ykuupf,'r')
hold off
%c) leiame funktsiooni väärtuse x=1.12 ja x=1.35 korral
y1splain=interp1(x,y,1.12,'spline')
y1=polyval(kordajad,1.12)
y2splain=interp1(x,y,1.35,'spline')
y2=polyval(kordajad,1.35)