# NOT RUN {
Suppose an investigator would like to determine the required sample size to test
kappa0=0.4 with precision of 0.1 on each side, in a study of interobserver agreement.
Further suppose that the prevalence of the trait of interest is 0.30.
# }
# NOT RUN {
CIBinary(kappa0=0.4, kappaL=0.3, kappaU=0.5, props=0.30, alpha=0.05);
# }
Run the code above in your browser using DataLab