Matlab da poisson dagılımı hesaplatan program

clc
clear
tekrar=10000;
n=100;
L=10;
s=0;
for i=1:tekrar
    x=poissrnd(L,1,n);
    ort(i)=mean(x);
    z(i)=(ort(i)-L)/sqrt(L/n); %standardize edilmiş hali
    if z(i)<=1.96 %değeri 1,96 dan küçük olanları saydırıyorum
        s=s+1;
    end
    ol(i)=s/i; %olasılığını hesapladım
end
ol
figure(1)
plot(ol)
figure(2)
t=-4:0.05:4;
hist(z,t)
%negatif binomdan elde ettik örnek artimatik ortalamsı istatistiğinin
%dağılımını elde ettik