Lorsqu’une variable aléatoire X suit une loi binomiale négative
NegBin(n,p), lorsqu’on a
negbinomial_icdf(n,p,x)=h c’est que
Proba(X ≤ h)=x=negbinomial_cdf(n,p,h).
On tape :
On obtient :
On tape :
On obtient :
Les programmes naifs pour calculer les fonctiond précédentes
negbino(n,p,k):=comb(-n,k)*p^n*(p-1)^k; negbin(n,p,k):=comb(n+k-1,k)*p^n*(1-p)^k; negbi(n,p,k):=(n+k-1)!/k!/(n-1)!*p^n*(1-p)^k; negbino_cdf(n,p,x):=sum(negbi(n,p,k),k=0..floor(x)); negbino_icdf(n,p,x):={ local k:=0; tantque negbino_cd(n,p,k)<x faire k:=k+1; ftantque; return k; }:;