test.cor(.484, 100, 0, .2)
# Should return:
# Estimate z p
# 0.484 3.2054 0.00135
test.cor(.372, 100, 0, 0)
# Should return:
# Estimate t df p
# 0.372 3.9673 98 0.00014
Run the code above in your browser using DataLab