相关系数与总体的检验，相关系数之间的检验，以及R

 

#object: 计算相关系数，并且计算相关系数之间的检验
#writer: mike
#time: 2020,11,14

a <- c(1,2,3,4,4,6)
b <- c(11,23,55,66,77,23)
d <- c(21,43,55,67,22,56)
e <- c(123,53,231,545,23,56)


data <- data.frame(a,b,d,e)

#计算相关系数
res <- cor(data)
print(res)


#计算相关系数之间的检验,只能对两个相关系数进行检验
res2 <- cor.test(data[,1],data[,2])   # 注意这里不能用data['a'], 它与data[,1] 的结果是有区别的
print(res2)


library('psych')

#只有在psych包中，才能对相关系数进行检验
res3 <- corr.test(res,short=F)

#这样可以打印出全部的结果
print(res3,short=F)