[過去ログ]
臨床統計もおもしろいですよ、その1 [無断転載禁止]©2ch.net (747レス)
上
下
前
次
1-
新
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
744
: 2018/10/13(土)15:21
ID:PvPTvQgs(2/2)
AA×
>>743
[240|
320
|
480
|
600
|
100%
|
JPG
|
べ
|
レス栞
|
レス消
]
744: [sage] 2018/10/13(土) 15:21:07 ID:PvPTvQgs >>743 Rで数えると f <- function(ratio=1.2,man=800,woman=200,pass=100){ total=man+woman i=0:pass sum((choose(man,i)*choose(woman,pass-i)/choose(total,pass))*(i/man > ratio*(pass-i)/woman)) } f() Haskellで数えると ratio=1.2 pass=100 man=800 woman=200 total=man+woman ii=[0..pass] male_fem i= if r < ratio then 0 else p where a = (choose man i)*(choose woman (pass-i)) b = choose total pass m=fromIntegral i/ fromIntegral man w=fromIntegral (pass-i)/fromIntegral woman r = m/w p = (fromIntegral a) / (fromIntegral b) main = do print $ sum ( map male_fem ii) http://egg.5ch.net/test/read.cgi/hosp/1493809494/744
で数えると で数えると
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 3 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
ぬこの手
ぬこTOP
0.200s*