% Harjutustund 10, ylesanne 3
x=[0:pi/4:2*pi]
y=cos(x)

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

% a) lineaarsplainiga S^(1,0)(x)
ylineaar=interp1(x,y,x,'linear');
hold on
plot(x,ylineaar,'r')
% b) kuupsplainiga S^(3,2)(x) 
xx=[0:pi/12:2*pi];
ykuup=interp1(x,y,xx,'spline');
hold on
plot(xx,ykuup,'b')
% c) y=cosx joonisele
y=@(x) cos(x);
hold on
fplot(y)