1.数据准备
数据的列名不能存在中文名称
library(readxl)
mydata<- read_excel("F:/Study data/Drawing/Annual.xlsx")$导入数据
library(lattice)
library(survival)
library(Formula)
library(ggplot2)
library(Hmisc)
res<-rcorr(as.matrix(mydata))
s=res$r //r为相关性数值
d=res$p
write.csv(s,file="Annual_r.csv")
write.csv(d,file="Annual_p.csv")