replicate.spear(.05, .598, 80, .324, 200)
# Should return:
# Estimate SE z p LL UL
# Original: 0.598 0.07948367 5.315140 1.065752e-07 0.41985966 0.7317733
# Follow-up: 0.324 0.06541994 4.570582 4.863705e-06 0.19049455 0.4457384
# Original - Follow-up: 0.274 0.10294378 3.437975 5.860809e-04 0.09481418 0.4342171
# Average: 0.461 0.05147189 9.967944 0.000000e+00 0.36695230 0.5457190
Run the code above in your browser using DataLab