如何增加 grid.arrange 产生的图的大小

Question

我正在与 R 和 Shiny 合作，使用 ggplot2 和 gridExtra 包一次显示不同的表格。

我的问题是，当我尝试使用 gridExtra 合并 12 个地块时，它们变得很小。

我的合并代码如下：

grid.arrange(p1, p12, p2, p22, p3, p32, p4, p42, p5, p52, p6, p62,
             ncol=2)

这就是所有地块的编码方式：

p62 = ggplot(data = dataframe1, aes(x = Week, y = DB, con = Type)) +
  xlab("Week") +
  ggtitle("Country") +
  theme(plot.title = element_text(size = 10, face = "italic")) +
  ylab("DB") +
  geom_line(size = 1) +
  geom_line(aes(colour = Type), size = 1) + 
  guides(col = guide_legend(title = "Period")) + 
  scale_color_manual(values = c('#999999', '#E69F00', "purple"))

当我仅使用 4 个地块对其进行测试时，各个地块的大小非常完美：

但是当我写下所有 12 个时，它们变得很小:

那么我的问题是：有没有办法改变各个地块的大小？

Answer 1

这个答案有多个部分：

在 Shiny 中，要增加尺寸（高度）或绘图输出，请在 UI:

的输出元素中使用高度参数

plotOutput(outputId, height = "400px")

接下来，正如@Tung 所建议的，您不必绘制所有多余的图例。请参阅包 lemon 中的 grid_arrange_shared_legend，也许还有 g_legend。

如何增加 grid.arrange 产生的图的大小

How to increase the size of a plot resulting from grid.arrange

r

ggplot2

gridextra

shiny