clear %vahemälu puhtaks
t=[1 2 5 8 11 12];
y=[5 8 14 26 50 98];
%võrk
tvork=1:0.001:12;

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

%2) vähimruutude mõttes ruutfunktsioon
kordajad=polyfit(t,y,2) %2, sest tahame ruutfunktsiooni
yruut=polyval(kordajad,tvork); %leitakse ruutfunktsiooni väärtused

%joonis
plot(t,y,'k*',tvork,ylinear,tvork,yruut)
legend('lähteandmed','lineaarsplain','ruutfunktsioon vähimruutude mõttes')
title('Ülesanne 3')

%arvutamine
ruut3=polyval(kordajad,3)
ruut9=polyval(kordajad,9)
