Wolfram 语言™

含有数量的删失分布

可以用均值为 191 磅、标准差为 70 磅的正态分布为美国成年男性的体重建模. 假设浴室体重计的上限为 300 磅，求用浴室体重计测得的体重的分布.

In[1]:=

\[ScriptCapitalD] = CensoredDistribution[{Quantity[0, "Pounds"], Quantity[300, "Pounds"]}, \[ScriptD] = NormalDistribution[Quantity[191, "Pounds"], Quantity[70, "Pounds"]]]

Out[1]=

累积分布函数.

In[2]:=

Plot[CDF[\[ScriptCapitalD], Quantity[x, "Pounds"]] // Evaluate, {x, 0, 350}, Filling -> Axis, Exclusions -> None, AxesLabel -> {"lb"}]

Out[2]=

删失分布的平均体重低于原来分布的平均体重.

In[3]:=

{Mean[\[ScriptCapitalD]], Mean[\[ScriptD]]} // N

Out[3]=

根据删失分布所得的体重中位数则与原来分布的体重中位数相同.

In[4]:=

{Median[\[ScriptCapitalD]], Median[\[ScriptD]]}

Out[4]=