# Spearman correlation in R

Wk08b<-data.frame(matrix(ncol = 0, nrow = 14))
Wk08b$V1<-c(897,904,1019,1521,1799,2444,3213,4567,5678,5679,5680,6789,6901,8924)
Wk08b$V2<-c(0,1,5,6,8,9,11,13,17,18,19,22,36,81)

psych::corr.test(Wk08b, method="pearson")
## Call:psych::corr.test(x = Wk08b, method = "pearson")
## Correlation matrix
## V1 V2
## V1 1.00 0.83
## V2 0.83 1.00
## Sample Size
## [1] 14
## Probability values (Entries above the diagonal are adjusted for multiple tests.)
## V1 V2
## V1 0 0
## V2 0 0
##
## To see confidence intervals of the correlations, print with the short=FALSE option
psych::corr.test(Wk08b, method="spearman")
## Call:psych::corr.test(x = Wk08b, method = "spearman")
## Correlation matrix
## V1 V2
## V1 1 1
## V2 1 1
## Sample Size
## [1] 14
## Probability values (Entries above the diagonal are adjusted for multiple tests.)
## V1 V2
## V1 0 0
## V2 0 0
##
## To see confidence intervals of the correlations, print with the short=FALSE option