grid.arrange将所有表格对齐到Rmarkdown中的顶部

Question

如何将grid.arrange中的所有表格对齐到顶部？默认情况下，表格似乎处于中间对齐状态。

df1 = data.frame(x=c(1, 2, 3), y=c('a', 'b', 'c'))
df2 = data.frame(x=rep(1, 10), y=rep('a', 10))
grid.arrange(tableGrob(df1), tableGrob(df2),
             nrow=1, ncol=2)

Answer 1

g1 <- tableGrob(df1)    
g2 <- tableGrob(df2)

grid.draw(combine(g1, g2, along=1))