想画热图出现的问题,按照网上教程:将n的列名赋值给annotation_col的行名,然后说row.names长度不对。
但是这两个表的生成的每一步都是按照教程来的,并不知道是哪一步出了问题也不知道该从何下手。。(抓耳挠腮)
names(Clinicaldata)
Clinicaldata=Clinicaldata[-c(37,275,344),]
dat1=as.data.frame(dat1)
dat1=dat1[,-c(37,275,344)]
dat1=as.matrix(dat1)
rownames(Clinicaldata)=Clinicaldata[,1]
Clinicaldata=Clinicaldata[,-1]
names(Clinicaldata)
library(stringr)
Group=ifelse(str_detect(Clinicaldata$in.hospital.mortality.ch1,"Survived"),"Surv","Died")
Group
Group = factor(Group, levels = c("Surv","Died"))
Group
cg=names(tail(sort(apply(dat1,1,sd)),1000)) #先排序,再选择最前面1000个
n=dat1[cg,]
library(pheatmap)
annotation_col=data.frame(group=Group)##将Group[value]转变成数据框,形成数据annotation_col
rownames(annotation_col)=colnames(n)
接着就出问题了
有没有大佬可以帮忙看看qwq卡了好几天了