pheatmap是一个功能十分强大的R包,在绘制热图方面十分的便利,但是该包没有提供修改热图横纵坐标标签颜色的方法,如果想要更改颜色可以参考如下的策略:
# pl 为创建的pheatmap对象
pl <- pheatmap(data, scale="none", cluster_rows = F, cluster_cols = F, show_rownames = T, show_colnames = T)
# 设置横坐标颜色
pl$gtable$grobs[[3]]$gp=gpar(col="#ffffff", fontsize=10)# xlabels
pl$gtable$grobs[[4]]$gp=gpar(col="#ffffff", fontsize=20)# ylabels
pl$gtable$grobs[[1]]$gp=gpar(col="#ffffff", lwd=2) # change the color of the dendrogram and set the linewidth to 2
pl
此教程参考:
在改颜色的时候请先删掉目前已有的图层,即下图中的“扫把”,不然新绘制的图层会叠加到原有的图层上面

image.png