se.ave.cor.nonover(.357, .398, .755, .331, .347, .821, 100)
# Should return:
# Estimate SE VAR(cor12) VAR(cor34) COV(cor12,cor34)
# Correlation: 0.377500 0.07768887 0.00784892 0.007301895 0.004495714
# Fisher: 0.397141 0.09059993 0.01030928 0.010309278 0.006122153
Run the code above in your browser using DataLab