% Harjutustund 12, ylesanne 1
% leiame funktsiooni tuletised ligikaudu

% esitame diskreetsel kujul oleva funktsiooni andmed, teeme joonise
x=[1:0.1:2];
h=0.1; % sammu pikkus
y=[4,7,2.1,15,3,5.2,6,8.5,14,15.1,17.8];
plot(x,y,'o')

% leiame 2. järku tuletise sõlmedes (keskmistes sõlmedes)
for i=2:length(x)-1
  tuletis2(i)=(y(i-1)-2*y(i)+y(i+1))/h^2;
end
tuletis2


% tuletis=[?]; 







% leiame tuletise 1. sõlmes
tuletis(1)=(y(2)-y(1))/h

% leiame tuletise keskmistes sõlmedes
for i=2:(length(x)-1)
  tuletis(i)=(y(i+1)-y(i-1))/(2*h);
end
tuletis(11)=(y(11)-y(10))/h

% tuletis viimases sõlmes

