ci.prop(.05, 120, 300)
# Should return:
# Estimate SE LL UL
# Adjusted Wald 0.4013158 0.02811287 0.3462156 0.4564160
# Wilson with cc 0.4000000 0.02828427 0.3445577 0.4580464
# Exact 0.4000000 0.02828427 0.3441290 0.4578664
Run the code above in your browser using DataLab