我正在与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个时,它们变得很小了:
然后我的问题是:有没有办法改变单个地块的大小?
答案 0 :(得分:0)
此答案包含多个部分:
在Shiny中,要增加大小(高度)或打印输出,请在UI的输出元素中使用height参数:
plotOutput(outputId, height = "400px")
接下来,按照@Tung的建议,您不必绘制所有多余的图例。请参见软件包grid_arrange_shared_legend
中的lemon
,甚至可以参见g_legend
。