PP Presentation
for k9=1 to total
num=0
r9=rnd
t9=exp(-lambda)
while r9 > t9
num = num + 1
r9 = r9 * rnd
wend
x(k9)=num
next k9
(returns a discrete Poisson pdf in x())
Previous slide
Next slide
Back to the first slide
View Graphic Version