WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

2つの境界の間で動く粒子

2つの境界の間を動く粒子の衝突時間は，平均3ミリ秒で指数分布に従う．粒子が右側の境界()から動き始め，左側の境界()に向かって動く場合に，100ミリ秒間の衝突過程のシミュレーションを行う．

Wolfram Language code: collisionProcess = TelegraphProcess[1 / 3];
Wolfram Language code: sample = RandomFunction[collisionProcess, {0, 100}];
Wolfram Language code: ListLinePlot[sample["Path"], InterpolationOrder -> 0, Filling -> Axis]
スライス分布の分散は1である：
Wolfram Language code: Variance[collisionProcess[100]]
サンプルの分散と比べる：
Wolfram Language code: Variance[RandomVariate[collisionProcess[100], 10 ^ 4]]//N