as.htest(result.object) "as.htest"(result.object)
data("aptitude") cocor.result <- cocor(~knowledge + intelligence.a | logic + intelligence.a, aptitude$sample1) as.htest(cocor.result)
Run the code above in your browser using DataLab