clear
%algandmed
s=0:0.25:1.25;
t=[0 25 49.4 73 96.4 119.4];
%võrk
svork=0:0.001:1.25;
tlineaar=interp1(s,t,svork,'linear');
tsplain=interp1(s,t,svork,'spline');
%joonis
plot(s,t,'r*',svork,tlineaar,svork,tsplain)
xlabel('s')
ylabel('t')
legend('algandmed','lineaarne lähend','kuupsplain')

%arvutamine
%kui läbitud on 0,45 miili
aeg1=interp1(s,t,0.45,'linear')
aeg2=interp1(s,t,0.45,'spline')
%kui läbitud on 0,9 miili
aeg3=interp1(s,t,0.9,'linear')
aeg4=interp1(s,t,0.9,'spline')