>>765
せっかくの機会なのでDiagnostic Odds Ratioを比較してみた。
http://www.crc-group.co.jp/crc/q_and_a/67.htmlの数値の平均を感度・特異度とした。
#
# 尿素呼気試験(B) 90〜100 80〜99
# 血清抗体(S) 88〜96 89〜100
# 尿中抗体(U) 89〜97 77〜95
# 便中抗原(F) 90〜98 87〜100

U=c(90/2+100/2,80/2+99/2)/100
S=c(88/2+96/2,89/2+100/2)/100
U=c(89/2+97/2,77/2+95/2)/100
F=c(90/2+98/2,87/2+100/2)/100

DOR <- function(T){
TP=T[1] ; FN=1-TP
TN=T[2] ; FP=1-TN
pLR=TP/FP
nLR=FN/TN
pLR/nLR
}
DOR(U)
DOR(S)
DOR(U)
DOR(F)