[過去ログ] 高校数学の質問スレ Part437 (1002レス)
上下前次1-新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索 歴削→次スレ 栞削→次スレ 過去ログメニュー
145(1): 2024/07/21(日)07:00 ID:iGZdMXnd(6/6) AAS
>>139
100万回乱数発生させてシミュレーションしてみた。
Wolfram Language 14.0.0 Engine for Microsoft Windows (64-bit)
Copyright 1988-2023 Wolfram Research, Inc.
In[1]:= p={4/10,3/10,2/10,1/10};
In[2]:= sim[]:=(
For[li=RandomChoice[p->Range[4],8];cl=Counts@li;count=8,
Length[cl]<4 || AnyTrue[cl,#<2&],count++, AppendTo[li,RandomChoice[p->Range[4],1]];li=Flatten@li;cl=Counts@li];
count
)
In[3]:= N@Mean@Table[sim[],10^6]
Out[3]= 22.3857
上下前次1-新書関写板覧索設栞歴
あと 857 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ
ぬこの手 ぬこTOP 0.024s