% harjutustund nr. 8, ülesanne 2
% 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];
% esitame andmed näiteks tabeli kujul
disp([x;y])
% joonis
plot(x,y,'o')
hold on
grid on
% a) esimese astme polünoom
k1=polyfit(x,y,1)
yk1=polyval(k1,x)
disp([x;y;yk1])
% joonis
plot(x,yk1)
hold on
% b) teise astme polünoom
k2=polyfit(x,y,2)
yk2=polyval(k2,x)
plot(x,yk2)
hold on
% c) kolmanda astme polünoom
k3=polyfit(x,y,3)
yk3=polyval(k3,x)
plot(x,yk3)
hold on
% d) kuuenda astme polünoom
xx=[-1:0.1:9];
k6=polyfit(x,y,6)
yk6=polyval(k6,xx)
plot(xx,yk6,'-')
hold on
legend('andmed','1-aste','2-aste','3-aste','6-aste')
% e) leiame polünoomi väärtuse, kui x=3.5
polyval(k2,3.5) % aluseks 2-astme polünoom
polyval(k6,3.5) % aluseks 6-astme polünoom