使用`gridExtra`和多个方面并排绘制图形

Question

我有两个不同大小的数据库dt和dt1。我想使用grid.arrange包中的gridExtra命令来并排显示g1和g2。如果可能，我还希望g1和g2使用facet_grid或facet_wrap命令或使用gridExtra，但使用{{1}视觉的。我在互联网上进行了长时间的搜索，无法使用下面的代码获取这些图片。

facet_grid\facet_wrap

Answer 1

这是否符合您的要求grid.arrange(gt, gt2, ncol = 2)？

（代码中的g1和g2都是NULL，因为它们是通过调用grid.draw创建的，它不会返回任何内容）

要使用facet_wrap，您需要将所有数据放入一个长格式的数据框中：

library(tidyr)
df <- cbind.data.frame(dt, dt1)
df <- gather(df, key = "db", value = "value")

然后绘制：

p <- ggplot(df, aes(x = value)) + 
geom_histogram(aes(y = ..density..), 
               binwidth = .5,
               breaks = seq(-2, 2, by = .1)) +
facet_wrap(~ db)