Wrap cor.test (test of liner correlation).

# S3 method for htest
wrapCorTest(x, ...)

Arguments

x

cor.test result

...

extra arguments (not used)

Value

wrapped stat

Examples

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)
#> [1] "Pearson's product-moment correlation: (r=0.9767, p=3.094e-05)."