powered by
Wrap cor.test (test of liner correlation).
# S3 method for htest wrapCorTest(x, ...)
wrapped stat
cor.test result
extra arguments (not used)
d <- data.frame(x=c(1,2,3,4,5,6,7,7), y=c(1,1,2,2,3,3,4,4)) ct <- cor.test(d$x,d$y) wrapCorTest(ct)
Run the code above in your browser using DataLab