Радиоактивное излучение 

Радиоактивный источник излучает частицы согласно процессу Пуассона с интенсивностью в час. Найдём вероятность того, что в течение пятичасового интервала источник не излучит ни одной частицы.

In[1]:=

X emissionProcess = PoissonProcess[Log[5]];

In[2]:=

X ListLinePlot[RandomFunction[emissionProcess, {0, 10}], InterpolationOrder -> 0, Filling -> Axis]

Out[2]=

Вероятность того, что количество излучений, произведённых источником в течение пятичасового интервала равно нулю.

In[3]:=

X 1 - NProbability[x[1] > 0, x \[Distributed] emissionProcess]^5

Out[3]=