## EXAMPLE 1:
## To confirm your country's disease freedom status you intend to use a test
## applied at the herd level. The test is expensive so you decide to pool the
## samples taken from individual herds. How many pooled samples of size 5 are
## required to be 95% confident that you will have detected disease if
## 1% of herds are disease-positive? Assume a diagnostic sensitivity and
## specificity of 0.90 and 0.95 for the pooled testing regime.
rsu.sssep.rspool(k = 5, pstar = 0.01, pse = 0.90, psp = 0.95, se.p = 0.95)
## A total of 32 pools (each comprised a samples from 5 herds) need to be
## tested.
Run the code above in your browser using DataLab