% Tund 8, ülesanne 1
% andmed
x=[-1,0.1,0.5,3,4,6.3,7,9];
y=[-2,0.4,0.7,2,4,3.6,3.8,6];
plot(x,y,'o')
hold on
% koostame 1-astme polünoomi
kordajad1=polyfit(x,y,1)
yvaartused1=polyval(kordajad1,x);
plot(x,yvaartused1,'b-')
% koostame 2-astme polünoomi
kordajad2=polyfit(x,y,2)
% -0.0394x^2+0.9678x-0.2182
xvork=[-1:0.1:9];
yvaartused2=polyval(kordajad2,xvork);
plot(xvork,yvaartused2,'r-')
% koostame 3-astme polünoomi
kordajad3=polyfit(x,y,3);
yvaartused3=polyval(kordajad3,x);
hold on
plot(x,yvaartused3,'g-')
% koostame 6-astme polünoomi
kordajad6=polyfit(x,y,6);
yvaartused6=polyval(kordajad6,x);
hold on
plot(x,yvaartused6,'k-')
hold off
% leiame funktsiooni väärtuse, x=3.5
% aluseks teise astme polünoomi
polyval(kordajad2,3.5) % polünoomi väärtus, kui x=3.5
polyval(kordajad6,3.5)