ci.stdmean.ps(.05, 602.4, 705.6, 33.17, 51.08, .769, 8)
# Should return:
# Estimate adj Estimate SE LL UL
# Unweighted standardizer: -2.3963 -2.2185 0.65209 -3.6744 -1.1182
# Measurement 1 standardizer: -3.1112 -2.7656 0.91362 -4.9019 -1.3206
# Measurement 2 standardizer: -2.0204 -1.7959 0.59328 -3.1832 -0.8576
Run the code above in your browser using DataLab