热图是表示不同基因或者蛋白表达差异量的一种方式,由于它能直观的表示相关信息,因此应用非常普遍。
数据格式:
library(pheatmap)
mydata<-read.table("gzwj1.csv",header=TRUE,sep = ",")
mydata2<-mydata[,-1]
rownames(mydata2)<-mydata[,1]
#读取数据并将第一列数据改为行名
pheatmap(mydata2,cluster_rows = F,treeheight_row=200, cluster_cols =T,treeheight_col=30,legend = T,color = colorRampPalette(c("yellow2","greenyellow","dodgerblue"))(1000),border_color = T,fontsize=12,fontsize_row = 16,fontsize_col = 28,display_numbers = F,number_format = "%.2f" ,scale = "row")
#cluster_row=F表示不绘制行聚类线,cluster_cols=F表示不绘制列聚类线,treeheight_row表示横向聚类线的宽度,legend=F表示不绘制图例,color表示绘制图形的颜色("magenta","white","cyan"),border_color=T表示绘制边缘颜色,fontsize表示图例大小,fontsize_row=12表示行名字母大小,fontsize_col表示列名字母大小,display_numbers表示是否显示不同基因表达量数值,number_format="%.2f"表示小数点后2位
,
参考资料:
https://www.rapidtables.com/web/color/blue-color.htmlwww.rapidtables.com 5个画热图的R包,你都知道吗?mp.weixin.qq.com5个画热图的R包,你都知道吗?