语言绘制基因表达热图_R语言绘图教程 | 如何绘制“漂亮”的热图？

实用科研工具推荐 、详实生信软件教程分享、前沿创新组学文章解读、独家生信视频教程发布，欢迎关注微信公众号：基迪奥生物 （gene-denovo）

|本文作者：莫北

---

说到绘制热图，其实有非常多的绘制方法，比如使用R包、Origin、Graphpad Prism、OmicShare tools等等，也有大佬尝试用Excel绘制，感兴趣可到拓展阅读部分查看。

虽然有这么多的方法，但出图最好看的方法是使用pheatmap（Pretty Heatmaps）这个R包绘制热图。在众多绘制热图的R包中，pheatmap也相对容易上手。

虽然这个R包我自己用了很多次，但仍有一些地方抱有疑问，比如能不能换字体？图例的刻度、大小能不能调？

下面就以《推荐一个快速绘制热图的在线工具》一文的数据为例，介绍一些pheatmap的一些个性化调整方法。

#加载R包；
library(pheatmap)
#查看当前目录的文件；
dir()
#读入数据；
df<-read.table("top30genesexp.txt",header= T,row.names = 1,sep = "t")
#查看数据的前6行，前6列；
df[1:6,1:6]

绘制热图

#自定义颜色；
mycol<-colorRampPalette(c("white","tomato"))(100)
p<-pheatmap(df,scale = "row",
           border_color ="white",color = mycol,
           show_rownames=F)
p

#调整图例颜色条的刻度和刻度