% Harjutustund 10, ylesanne 2
x=[0,0.25,0.5,0.75,1,1.25];
y=[0,25,49.4,73,96.4,119.4];

plot(x,y,'o')
hold on
grid on
xline(0)
yline(0)

% a) lähendame andmeid lineaarsplainiga S^(1,0)(x)
ylineaar=interp1(x,y,x,'linear')
plot(x,ylineaar,'r')

% b) lähendame andmeid kuupsplainiga S^(3,2)(x)
xx=[0:0.01:1.25];
ykuup=interp1(x,y,xx,'spline');
hold on
plot(xx,ykuup,'b')

% c) Leida aeg 0.45 miili läbimiseks
[interp1(x,y,0.45,'linear') interp1(x,y,0.45,'spline')]
