TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼
πって本当に無理数なの?
分からない問題はここに書いてね478
虚数とか複素数ってなんですか?
           朝日生命
統計ソフトSTATAの部屋 Ver.2
経済学は数学を誤用している
素数が無限に存在する証明
中1の弟が数学好きなようだから先取りさせたい
現代数学の系譜11 ガロア理論を読む29
¶ 放送大学の数学科目 6講目 §
10 :
感度70%特異度90%で
有病率と陽性的中率・陰性的中率の関係をグラフにしてみた。
https://i.imgur.com/HGqPv2y.jpg

陽性的中率が0.8になるのは有病率が0.63のとき

そのRのコードはこれ。
rm(list=ls())

pr2pv <- function( # prevalence to predicative value
pr ,# prevalence
sn=0.7, # sensitibity=TP/(TP+FN)
sp=0.9) # specificity=TN/(TN+FP)
{
N=1 # polutaion million, billion,or any proper unit
si=pr*N # sick population
he=(1-pr)*N # healthy population
TP=si*sn
FN=si*(1-sn)
TN=he*sn
FP=he*(1-sn)
PPV=TP/(TP+FP)
NPV=TN/(TN+FN)
PV=c(PPV=PPV,NPV=NPV)
return(PV)
}

prev=seq(1e-7,1,length.out = 1000)
plot(prev,sapply(prev, function(x) pr2pv(x)['PPV']),bty='l',type='l',
ylab='predicative vale',xlab='prevalence(log)',main='sensitity=0.7,specificity=0.9',log='x',lwd=2)
lines(prev,sapply(prev, function(x) pr2pv(x)['NPV']),lty=3,lwd=2)
legend('center',bty='n',legend=c('Posivive Predicative Value','Negative Predicative Value'),lty=c(1,3),lwd=2)

abline(h=0.8,col='gray')
uniroot(function(x) pr2pv(x)['PPV']-0.8, c(0,1))

@hyuasa=湯浅久利先生
工学部の一年生だけど院は数学科にいきたい
理論計算機数学のスレ
【自称数学者】三鷹の大類昌俊2018-2【つどい出禁】
Inter-universal geometry と ABC予想 16
数学の本 第89巻
前の人があげた数を素因数分解するスレ
軍事機密にされた私が日本数学会事務局宛てに書いた素数の式。
【大学院へ】 30過ぎて、数学の道へ その2
数学は東大より京大 ← これ
--------------------
【勇往邁進】大分トリニータ 893【with Trinita Spirits】
▼住友林業ホームサービスPart18▼ゴルゴダの丘6▼
【名古屋】中小規模の運送屋【愛知県】その30
Tree of Savior ウィザードスレ C88
精神科医は何やってるんだ。
【MHFZ】片手剣スレ13
同性愛者は原爆で焼却処分すべきだ
1994-1997のミスチルを超えるアーティストは今後登場し得るか?
日本、サンマ漁獲枠導入を主張へ 「中国が乱獲しすぎて不漁なんよ😡」 [367148405]
汚い八重山「自衛隊宿舎の場所を防犯上の理由で秘密にされた。意味が分からない。住民を疑うのか!」
石堂淑朗の作品の思い出と批評
ぬるぽして1時間以内にガッされなければ神@FFDQ板558
ジャニーズ事務所の行く末
ソフトバンク、昨年の米MLBドラフトで1位指名のカーター・スチュワート投手(19)を総額8億円で獲得。2億円の契約を蹴って来日 [819960131]
ソニータイマーって設計ミス?それとも悪意?
イリヤ「あっつ〜い!こんなんじゃ眠れないよぉってあれーっ!変な視線を感じるよーっ!?」←これw
☆罰ファロー・コレガ被害者の会Vol2★
今日の読売と産経の社説がまるで双子 要約すると「中国のアフリカ支援を許すな」だが [389326466]
___寺門ジモンの肉専門チャンネル 5___
【富士山】静岡東部突発OFF31【石廊崎】
TOP カテ一覧 スレ一覧 100〜終まで 2ch元 削除依頼