# Zeichnen Poissonverteilung

m:6;

W(x):=m**x/x!*exp(-m);

wxplot2d([W(x)], [x,0,16], [y,0,0.2])$

l:makelist(floor(W(x)*1000+0.5)/1000.0,x,0,16);