9

確率関数またはN確率関数を使用して、4回のコイン投げから3つ以上のヘッドの確率を計算することは可能ですか。

これは、この問題に対するささいな答えについての質問ではありません。分布を使用してMathematicaでこの種の問題を解決する方法を理解することです。

したがって、分布Pからの4つの確率変数を使用します

私はこのような何かがうまくいくことを望んでいましたが、それはうまくいきません。私は0を取得します。

P = BernoulliDistribution[0.5];
vars = List[Distributed[a,P],Distributed[b,P],Distributed[c,P],Distributed[c,P]];
NProbability[Count[ {a,b,c,d}, 1] >= 3,  vars]

任意のアイデアをいただければ幸いです。

4

2 に答える 2

10

ここで統計に Mma を使用する専門家ではありませんが、これはうまくいくようです:

l = TransformedDistribution[
       x + y + w + z, {x \[Distributed] BernoulliDistribution[0.5], 
                       y \[Distributed] BernoulliDistribution[0.5], 
                       z \[Distributed] BernoulliDistribution[0.5], 
                       w \[Distributed] BernoulliDistribution[0.5]}];

Table[NProbability[x > i, x \[Distributed] l], {i, -1, 4}]
(*
{1, 0.9375, 0.6875, 0.3125, 0.0625, 0.}
*)
于 2011-10-19T12:27:12.407 に答える
8 
In[10]:= Probability[a + b + c + d >= 3, vars]

Out[10]= 0.3125

コイン投げは BinomialDistribution で簡単に記述できます。

In[12]:= Probability[m >= 3, m \[Distributed] BinomialDistribution[4, 0.5]]

Out[12]= 0.3125
于 2011-10-19T20:58:16.140 に答える