clear %puhastab vahemälu

%algandmed
x=1:8;
y=[0 8 5 6 2 4 3 1];

xvork=1:1e-3:8; %teeme ise võrgu, 
%mille algus on esimene x, lõpp viimane x ja sammuks 10^-3

%splainid
ylinear=interp1(x,y,xvork,'linear');
ykuup=interp1(x,y,xvork,'spline');

%joonis
plot(x,y,'k+',xvork,ylinear,xvork,ykuup)
xlabel('x')
ylabel('y')
legend('algandmed','lineaarsplain','kuupsplain')