1. 解決問題
??在進行多圖繪制的時候癌椿，用cowplot::plot_grid函數(shù)進行多圖組合，結(jié)果在多圖組合的時候，別的ggplot畫圖的對象沒有任何問題无虚，但是pheatmap的出現(xiàn)問題，并拋出如下警告信息：
p4<-cowplot::plot_grid(p1, p2, p3, ncol=1, labels=LETTERS[1:3])
Warning message:
In as_grob.default(plot) :
Cannot convert object of class pheatmap into a grob.
2. 解決方法
??通過一系列的查詢報錯原因衍锚，終于找到了問題的原因友题，原來cowplot::plot_grid多圖組合的話，必須得是ggplot對象戴质，而pheatmap不是ggplot對象度宦，因此才會出現(xiàn)此問題。并且找到了相應(yīng)的解決方法解決方法：
library(pheatmap)
test <- matrix(rnorm(200), 20, 10)
mfs <- mfs_ma <- mfs_fe <- pheatmap(test)
cowplot::plot_grid(mfs$gtable, mfs_ma$gtable, mfs_fe$gtable,
ncol= 3, labels=LETTERS[1:3])
pheatmap組合圖示例結(jié)果圖
??到此告匠，pheatmap多圖組合報錯問題得到解決戈抄，后續(xù)如果需要不同的圖組合，可以很方便的組合一起后专，
cowplot::plot_grid(p1, p2,p3$gtable,ncol= 3, labels=LETTERS[1:3])
#這里的p3為pheatmap畫圖的對象
參考鏈接
Put many heatmap images in one single slide
2021年1月4日
