# 25 confidence intervals with a sample size each of 100
# mu=0, sigma=1, that is, sample from the standard normal
sim.CImean(25, 100)
# 25 confidence intervals with a sample size each of 100
# mu=100, sigma=15
# pause after each interval and show the data
sim.CImean(25, 100, mu=100, sigma=15, show.data=TRUE)
Run the code above in your browser using DataLab