clear
%lähteandmed
x=1:8;
y=[0 8 5 6 2 4 3 1];

%teeme võrgu
xvork=1:1e-3:8; %NB! Semikoolon rea lõppu
%NB! Sammupikkuse valime ise sobiva suurusega!

%lähendamine
ysplain=interp1(x,y,xvork,'spline'); %NB! Semikoolon rea lõppu

%joonis
plot(x,y,'r*',xvork,ysplain)
legend('lähteandmed','kuupsplain')
title('Funktsiooni lähendamine')