%%
%% TP2 Exercice 4
%% Illustration du TLC à partir de la loi Uniforme sur [0,1]
%%


n=input('Entrez la taille de l''échantillon (par exemple 10) :');
N=input('Entrez le nombre de réalisation (par exemple 2000):');
d=input('Précisez la discrétisation d (par exemple 100) :');
x=rand(n,N);Z=(sum(x)-n/2)/sqrt(n/12);
dz=range(Z)/d;[Effectifs,Classes]=hist(Z,d);
Abscisses=[min(Z)-dz/2:dz:max(Z)+dz/2];
DS=[0 Effectifs 0]/(N*dz);bar(Abscisses,DS,'b');

hold on
DN=dnorm(Abscisses);plot(Abscisses,DN,'r-');
legend('densite simulee','Loi Normal');
hold off

