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))