% crée le vecteur x,
%      y11 =f(x),
%      y12 =f'x),
%      y21 la dérivées approchées,
%      y22, l'erreur.
n=1000;
x=linspace(-10,10,n);

y11=-x.*sin(x);
y12=-x.*cos(x)-sin(x);
y21=diff(y11)./(x(2)-x(1));
y22=(y21-y12(1:n-1));

% tracé du graphique en haut à gauche

subplot(2,2,1); plot(x,y11);
title('la fonction');

% tracé du graphique en haut à droite

subplot(2,2,2); plot(x,y12);
title('la dérivée');

% tracé du graphique en bas à gauche

subplot(2,2,3); plot(x(1:n-1),y21);
title('la dérivée approchée');

% tracé du graphique en bas à droite

subplot(2,2,4); plot(x(1:n-1),y22);
title('l''erreur');


