将 marrangGrob 标题与绘图的左边界对齐

Question

我的问题解决了这个问题的第二个解决方案： 。

我想将标题放在 marrangeGrob 的左上角，但还要将其与绘图的左边界垂直对齐。

有没有办法自动执行此操作：无需通过尝试和错误找到 textGrob 的 x 参数的正确值？

Answer 1

也许只为左图添加标题：

library(ggplot2)
library(gridExtra)

p1 <- qplot(1:20) + ggtitle("Title")
p2 <- qplot(30, 35) + ggtitle("")

grid.arrange(p1, p2, nrow = 1)