ci.pbcor(.05, 28.32, 21.48, 3.81, 3.09, 40, 40)
# Should return:
# Estimate SE LL UL
# Weighted: 0.7065799 0.04890959 0.5885458 0.7854471
# Unweighted: 0.7020871 0.05018596 0.5808366 0.7828948
Run the code above in your browser using DataLab