R 语言 手写 计算 cor 相关系数 和 p值 流程 代码

定义数据

x<-c(3,4,3.5, 2.5,2)
y<-c(30,25,20, 35,40)

计算 variance

v1 =sum((x-mean(x))^2)/(5-1)
v2 =sum((y-mean(y))^2)/(5-1)

计算 standard deviation

s1 =sqrt(v1)
s2 =sqrt(v2)

计算 covariance

cov1 = sum((x-mean