search for: pdetr

Displaying 1 result from an estimated 1 matches for "pdetr".

Did you mean: pdeti
2007 Aug 11
1
binomial simulation
...e when disease occurred- *for someone from icu* - is: p(T+ | D+)=0.95. the distribution to detect disease when disease occurred- *for someone from reg.unit* - is: p(T+ | D+)=0.8. I want to compute the joint distribution for each unit: p(T+,D+) for icu, and the same for reg. I tried: pdeti <- 0 pdetr <- 0 picu <- pdeti*.6 preg <- pdetr*.6 dept <- c("icu","reg") icu <- rbinom(200, 1, .6) reg <- rbinom(300, 1, .6) for(i in 1:300) { if(dept=="icu") pdeti==0.95 if (dept=="reg") pdetr==0.80 } print(picu) print(preg) and got 50 war...