条件付き確率の続き。 Cは、被検査者が癌であるという事象。 Aは、検査結果が癌であるという事象。 事前確率と、真性陽性確率をいじくってみよう。 x<- function(p,r){ return(p*r/(p*r+(1-p)*(1-r))) } p<- r<- seq(from=0,to=1,by=0.01) theta<- 30 phi<- …