代码
mat<-read.table("/Users/aiyi/Downloads/All.DEG_final_3000.csv",header=TRUE,sep=",",row.names=1)
head(mat)
library(pheatmap)
cellheight=300/nrow(mat)
cellwidth=300/ncol(mat)
col=c("green","black","red")
color=colorRampPalette(col)(100)
pheatmap(mat,scale="row",show_rownames = F,color=color,cellwidth = cellwidth,cellheight = cellheight,border_color = "black")
其中head(mat)返回为:
绘图结果为
然后开始添加annotation,开始报错,
代码为:
annotation_col<-read.table("/Users/aiyi/Downloads/annotation_col.csv",header = T,row.names = 1,sep=',')
=========================================================================================
在加入annotation_col之后,就开始报错,然后也不能绘制出热图,plots画布无任何变化