レス書き込み
スレへ戻る
写
レス栞
レス消
底辺私立医大を卒業した医者って頭悪いよね? Part30
PC,スマホ,PHSは
ULA
べっかんこ
公式(スマホ)
公式(PC)
で書き込んでください。
名前
メール
引用切替:
レスアンカーのみ
>>841 > In[7]:= n = {3*4,3*5,4*5}; > In[8]:= {p1,p2,p3} = n/Total[n]; > In[9]:= {u1,u2,u3} = Floor[2024/n]+1; > In[10]:= f[x_] := Total[x*n]; > In[11]:= v = Flatten@Table[{x,y,z},{x,Range[0,u1]},{y,Range[0,u2]},{z,Range[0,u3]} ]; > In[12]:= m = Partition[v,3]; > In[13]:= y = Select[m,2024<=f[#] && f[#]<=2040&]; > In[14]:= fp[x_] := ( > n=Total[x]; > {x1,x2,x3}={x[[1]],x[[2]],x[[3]]}; > Binomial[n,x1]p1^x1 * Binomial[n-x1,x2]p2^x2 * p3^x3 > ) > In[15]:= p = fp /@ y; > In[16]:= pdf = p/Total[p]; > In[17]:= x = Total /@ y; > In[18]:= Total[x pdf] > Out[18]= 495904886863024711014690900126037925947158151253955867691586858290118663480916940260788181\ > > 604372384668673161160077913476388924610009381666181965328404540822774723934597627786022595480\ > > 781720140588331207803909691382542301305760276287633967192246724712364034709143616564290023136\ > > 791036653 / 399170493235018654399908642063415913011369141571001467137214805437161337290039906\ > > 913196588800673241916796559715750891456576910871356692132890930902737404771635711223541077460\ > > 954262289340296694519847364433075952126678819758516908619463844482254836343353585090173449556\ > > 8610202700178827 > > In[19]:= % // N > Out[19]= 124.234 > > In[20]:=
ローカルルール
SETTING.TXT
他の携帯ブラウザのレス書き込みフォームはこちら。
書き込み設定
で書き込みサイトの設定ができます。
・
ULA
・
べっかんこ(身代わりの術)
・
べっかんこ(通常)
・
公式(スマホ)
・
公式(PC)[PC,スマホ,PHS可]
書き込み設定(板別)
で板別の名前とメールを設定できます。
メモ帳
(0/65535文字)
上
下
板
覧
索
設
栞
歴
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.044s