Binomial
Aus Augenbit
Binomialkoeffizient
> binomial(n,k);
Binomialverteilung
> B:= proc (n, p, k)
> binomial(n,k) * p^k * (1-p)^(n-k):
> end;
> B := proc (n, p, k) binomial(n,k)*p^k*(1-p)^(n-k) end proc
> n:= 10:
> p:= 0.4:
> seq ([k,B (n, p, k)], k = 0..n);
[0, .60466176e-2], [1, .403107840e-1], [2, .1209323520], [3, .2149908480], [4, .2508226560], [5, .2006581248], [6, .1114767360], [7, .424673280e-1], [8, .106168320e-1], [9, .15728640e-2], [10, .1048576e-3]