底辺私立医大を卒業した医者って頭悪いよね？ Part5at HOSP底辺私立医大を卒業した医者って頭悪いよね？ Part5 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト400:卵の名無しさん 18/07/01 10:18:46.34 F3KIhVUK.net >>380 バグをしてしてみ！ ド底辺シリツ医大卒はスクリプトすら読めないんじゃねぇの？ 簡単にデバッグできた。 date=1:366 p=c(97/400,rep(1,365)) same.birth <- function(n,lwr=2,upr=1e6){ x=sample(date,n,replace=TRUE,prob=p) di=max(table(x)) lwr<=di & di<=upr } birth <- function(n,lwr=2,upr=1e6,k=1e4){ mean(replicate(k,same.birth(n,lwr,upr))) } Vectorize(birth)(100,3:5) 100人中同じ誕生月日の人が3,4,5人以上いる確率も算出できるな。 401:卵の名無しさん 18/07/01 10:24:03.68 F3KIhVUK.net これで 一つの病棟に50人入院しているとして 同じ誕生月日の人がちょうど3人いる確率が算出できる。 402:卵の名無しさん 18/07/01 10:24:59.90 F3KIhVUK.net 簡単すぎるから数学板に書くほどじゃないな。 403:卵の名無しさん 18/07/01 10:26:27.47 F3KIhVUK.net ド底辺って確率問題になんでコメントできないんだろ？ 問題が英文だから？ 馬鹿なの？ 比率計算の一次方程式すらできない馬鹿だったなぁ。 中学数学すらできない馬鹿なのにどうして大学に入れるの？ やっぱり、あれ？ う ら ぐ ち 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch