Как реализовать пуассоновский поток?

Question

[di]

Пытаюсь реализовать алгоритм взятый отсюда https://life-prog.ru/1_13833_puassonovskiy-potok.html (Рис. 28.6)

Получаю совсем другой результат (1-значное число вместо 33)

Мой код

<?php
$lambda = 8 / 24;
$Tn = 100;

$t = 0;
$N = 0;
do {
     $r = rand(0,1);
     $temp = (-1 / $lambda) * log($r);
     $t = $t + $temp;
     $N = $N + 1;
            //echo $t;
} while ($t <= $Tn);
var_dump($N);

Comments

[di]

rand() неправильно использую. Он всегда вернет 0 или 1

Answer 1

[pestunov]

Проблема здесь:
rand() возвращает 0 или 1
Надо делать что-то подобное
$r = rand(0, 100)/100;