clear
% Tund nr. 9, ülesanne 1

% esitame andmed
s=[0:0.25:1.25];
t=[0,25,49.4,73,96.4,119.4];
% andmed tabelina
disp([s;t])

%a) esitame andmed lineaarsplainiga S^1,0
svork=[0:0.2:1.25];
lineaarsplain=interp1(s,t,svork,'linear');

%b) esitame andmed kuupsplainina S^3,2
kuupsplain=interp1(s,t,svork,'spline');

% teeme joonise
plot(s,t,'o')
hold on
plot(svork,lineaarsplain,'r')
hold on
plot(svork,kuupsplain,'b')

%c) leiame aja, mis kulub 0,45 miili läbimiseks
aeglineaarsplainiga=interp1(s,t,0.45,'linear')
aegkuupsplainiga=interp1(s,t,0.45,'spline')