pheatmap是一個功能十分強大的R包，在繪制熱圖方面十分的便利，但是該包沒有提供修改熱圖橫縱坐標標簽顏色的方法，如果想要更改顏色可以參考如下的策略：

# pl 為創(chuàng)建的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

此教程參考：

http://ask.sov5.cn/q/mgMjlrR6qw

在改顏色的時候請先刪掉目前已有的圖層，即下圖中的“掃把”，不然新繪制的圖層會疊加到原有的圖層上面

image.png