数量のシミュレーション
数量分布から待機時間のシミュレーションを行う．
In[1]:=
wait\[ScriptCapitalD] =
QuantityDistribution[ExponentialDistribution[.4], "Minutes"]Out[1]=
単一の観察の結果は，Quantityオブジェクトで表される．
In[2]:=
RandomVariate[wait\[ScriptCapitalD]]Out[2]=
複数の観察のサンプル結果は，QuantityArrayオブジェクトで表される．
In[3]:=
sample = RandomVariate[wait\[ScriptCapitalD], 100]Out[3]=
Histogramを使ってサンプルを可視化する．
In[4]:=
Histogram[sample, AxesLabel -> Automatic]Out[4]=
サンプルの記述統計の一部を計算する．
In[5]:=
stats = {Mean, Median, Min, Max};
TableForm[Map[#[sample] &, stats], TableHeadings -> {stats, None}]Out[5]//TableForm=
