将多张热图图像放在一张幻灯片中

Question

我有3个热图图生成使用CRAN包热图。我想将这三张图片放在一张幻灯片中，然后使用以下命令

cowplot::plot_grid(mfs, mfs_ma, mfs_fe,ncol= 3, labels=LETTERS[1:3])

但它还我

Warning messages: In as_grob.default(plot) :Cannot convert object of class pheatmap into a grob

因此，我如何把这三张图片放在一张幻灯片上。

Answer 1

您的热图mfs、mfs_ma、mfs_fe都是pheatmap对象。

考虑以下简单示例：

library(pheatmap)
test <- matrix(rnorm(200), 20, 10)
mfs <- mfs_ma <- mfs_fe <- pheatmap(test)

您可以使用以下方法将3个热图排列成一个单独的地块：

cowplot::plot_grid(mfs$gtable, mfs_ma$gtable, mfs_fe$gtable,
                   ncol= 3, labels=LETTERS[1:3])

或

gridExtra::grid.arrange(grobs=list(mfs$gtable, mfs_ma$gtable, mfs_fe$gtable), 
                        ncol= 3, labels=LETTERS[1:3])

​

​