% Tund 13, ülesanne 3
x=[-1:0.1:-0.3];
y=[10,11,11.5,11.6,11.4,11.1,10,8.7];
plot(x,y,'o')
hold on
trapz(x,y)
% interpoleerime diskreetsel kujul olevat funktsiooni kuupsplainiga
% S^(3,2)(x)
xvork=[-1:0.001:-0.3];
y3splain=interp1(x,y,xvork,'spline'); 
% saame S^(3,2)(xvork) väärtused x-ide korral, st xvork
plot(xvork,y3splain,'m-')
f=@(z) interp1(x,y,z,'spline'); 
integral(f,-1,-0.3)
hold on

y1splain=interp1(x,y,xvork,'linear'); 
% saame S^(1,0)(xvork) väärtused x-ide korral, st xvork
plot(xvork,y1splain,'b-')
g=@(z) interp1(x,y,z,'linear'); 
integral(g,-1,-0.3)