# NOT RUN {
# 90% confidence interval for the 2x2 crossover
# n(total) = 24
CI.BE(pe=0.95, CV=0.3, n=24)
# should give
# lower upper
# 0.8213465 1.0988055
# same total number but unequal sequences
CI.BE(pe=0.95, CV=0.3, n=c(13, 11))
# lower upper
# 0.8209294 1.0993637
# }
Run the code above in your browser using DataCamp Workspace