% Harjutustunni 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];
% andmed tabelina
disp([x;y])
% kujutame andmed graafiliselt
plot(x,y,'o')
hold on
grid on

% a) koostame esimese astme polünoomi 
k1=polyfit(x,y,1) % polünoomi kordajad
yk1=polyval(k1,x)
disp([x;y;yk1])
% kanname joonisele 1-astme polünoomi
plot(x,yk1,'r-')
hold on
% b) teise astme polünoom
k2=polyfit(x,y,2) % polünoomi kordajad
yk2=polyval(k2,x)
disp([x;y;yk2])
% kanname joonisele 1-astme polünoomi
plot(x,yk2,'b-')
% c) kolmanda astme polünoom
k3=polyfit(x,y,3) % polünoomi kordajad
yk3=polyval(k3,x)
disp([x;y;yk3])
% kanname joonisele 1-astme polünoomi
plot(x,yk3,'k-')
hold off
% d) kuuenda astme polünoom
k6=polyfit(x,y,6) % polünoomi kordajad
yk6=polyval(k6,x)
disp([x;y;yk6])
% kanname joonisele 1-astme polünoomi
plot(x,yk3,'y-')
% leiame polünoomi väärtuse x=3.5 korral
% a) 2-astme polünoomi korral
polyval(k2,3.5)
% b) 6-nda astme polünoomi korral
polyval(k6,3.5)

% näide, x=3
polyval(k1,3)
polyval(k3,3)