使用ggplot，grid和gridExtra设置图形的宽度和高度

Question

如果我有一个由几个图组成的图形，请说三个垂直排列的图。这是一个gtable对象，可以使用以下内容绘制到页面

grid::grid.newpage()
grid::grid.draw(plot)

然而，我看到我的RStudio中的情节被搞砸了＃39;如下面的屏幕截图所示：

正如您在右下角所看到的那样，它被压扁，标题与图形的其他元素重叠。

如果我点击缩放并查看情节，那就更大了：

现在我知道，如果我要使用pdf（）或png（）和这样的设备导出我的gtable图，我可以设置宽度和高度，所以只要使它足够大以使得图不是压扁。

但是，我想使用gridSVG包中的export.grid而不是其中一个图形设备将其保存到SVG文件中。但是如果我做的话

gridSVG::export.grid(plot)

然后导出的SVG文件看起来像在RStudio绘图窗口中那样被压扁。 所以我的问题是，我如何操纵图形的尺寸，以便它被绘制到SVG而不看起来被压扁？我最初使用grid.newpage和grid.draw绘制了绘图，我想也许我必须使用网格指定页面或绘图的一些大小。

谢谢， 本。