# NOT RUN {
# By simple asymptotic method
RCI(20, 100)
# By Wilson Score (without continuity correction)
prop.test(20, 100, conf.level=0.9, correct=FALSE)
# By Exact method
binom.test(20, 100, conf.level=0.9)
# }
Run the code above in your browser using DataLab