clear
%algandmed
t=[1 2 5 8 11 12];
y=[5 8 14 26 50 98];

%võrk
tvork=1:1e-3:12;

%lähendamine
%1) lineaarsplainiga
ylin=interp1(t,y,tvork,'linear');

%2) vähimruutude mõttes ruutfunktsiooniga
kordajad=polyfit(t,y,2) %Otsime ruutfunktsiooni, sellepärast aste 2
yruut=polyval(kordajad,tvork); %leitakse ruutfunktsiooni väärtused tvorgu igas punktis

%joonis
plot(t,y,'r*',tvork,ylin,tvork,yruut)
legend('algandmed','lineaarsplain','ruutlähend')
grid on

%Arvutamine
vastus3=polyval(kordajad,3)
vastus9=polyval(kordajad,9)


