如何组合两个ggplots与一个旋转？

Question

如何将两个ggplots g1和g2组合在一起，左边一个，右边一个，旋转90°（只有右边一个）？

我已经查看了grid和gridExtra包，但是我找不到所有这些。

Answer 1

对于第二个图的width和height，可能需要进行一些调整，但这似乎有效：

p <- qplot(1:10)

library(grid)
grid.newpage()
print(p, vp=viewport(0, 0, width = unit(0.5, "npc"), just = c('left', 'bottom')))
print(p, vp=viewport(0.5, 0, angle = 90, height = unit(0.8, "npc"), width = 0.55, just = c('left', 'top')))