size.ci.mean2(.05, 37.1, 5, 1)
# Should return:
# n1 n2
# 47 47
size.ci.mean2(.05, 37.1, 5, 3)
# Should return:
# n1 n2
# 32 96
size.ci.mean2(.05, 37.1, 5, .5)
# Should return:
# n1 n2
# 70 35
Run the code above in your browser using DataLab