%lähteandmed
t=0:10:60; %vektor, mille samm on 10 minutit
T=[30 51 68 79 85.5 89 90];

%teeme võrgu, üle mille interpoleeritakse
tvork=0:0.01:60; %NB! semikoolon lõppu!
Tkuup=interp1(t,T,tvork,'spline'); %NB semikoolon

%joonis
plot(t,T,'r*',tvork,Tkuup)
xlabel('aeg t')
ylabel('temperatuur T')
legend('algandmed','kuupsplain')

%arvutamine
T_54=interp1(t,T,54,'spline')