分からない問題はここ ..
834:１３２人目の素数さん
18/11/17 17:31:53.36 Bs77u2Ev.net
>>804
Prelude> let entropy x = sum $ map (\i -> -i*(logBase 2 i)) ( map(/sum(x)) x )
Prelude> 30/50 * entropy [18, 12] + 20/50 * entropy [2, 18]
0.7701685941085136
次ページ続きを表示1を表示最新レス表示スレッドの検索類似スレ一覧話題のニュースおまかせリスト▼オプションを表示暇つぶし2ch
1910日前に更新/344 KB
担当:undef