replicate.prop1(.05, 21, 300, 35, 400)
# Should return:
# Estimate SE LL UL
# Original: 0.07565789 0.01516725 0.04593064 0.10538515
# Follow-up: 0.09158416 0.01435033 0.06345803 0.11971029
# Original - Follow-up: -0.01670456 0.02065098 -0.05067239 0.01726328
# Average: 0.08119996 0.01032549 0.06096237 0.10143755
Run the code above in your browser using DataLab