# HP Forums

Full Version: (12C Platinum) Poisson Distribution
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
ALG Mode program for Poisson Distribution

--------------------------------------------------------------

Procedure: k≤69

Case 1: For each new single calculation initialize with f [PRGM] or [GTO] 000

λ [R/S] display λ

--------------------------------------------------------------

Case 2: For same Average with more than one test value

f [PRGM] or [GTO] 000
λ [R/S] display λ
K0 [R/S] display Answer [R/S] display λ
K1 [R/S] display Answer [R/S] display λ
K2 [R/S] display Answer [R/S] display λ
K3 [R/S] display Answer [R/S] display λ
.
.
.
--------------------------------------------------------------

Example: FIX 4

Case 1: λ=2.8 and k=7

f [PRGM] or [GTO] 000
2.8 [R/S] display 2.8000
7 [R/S] display 0.0163

Case 2: λ=2.5 and k= 0, 1, 2, 3, 4, 5, 6, 7

f [PRGM] or [GTO] 000
2.5 [R/S] display 2.5000
0 [R/S] display 0.0821 [R/S] display 2.5000
1 [R/S] display 0.2052 [R/S] display 2.5000
2 [R/S] display 0.2565 [R/S] display 2.5000
.
.
.
7 [R/S] display 0.0099
---------------------------------------------------------
Program: ALG Mode
Code:
``` 007// 1 [CHS] [x] [X<>Y] [=] [e^x] [STO] 0  // Setup λ value to reuse by [LSTx] and store e^(- λ) 015// [RCL] 0 [x] [(] [LSTx] [Y^X] [R/S] [STO] 1 [)]  // Input and Store K then calculate e^(- λ) * (λ^k)  021// [÷] [RCL] 1 [n!] [=] [R/S] [GTO] 008  // Recall K to calculate K! then divide and done.```

Gamo
Reference URL's
• HP Forums: https://www.hpmuseum.org/forum/index.php
• :