4

の属性をgrid.arrange()無視しているようです。タイトル付きのテーブルをプロットしたいとしましょう...nametableGrob

baz<-lapply(seq(3),function(ii)
 tableGrob(format(matrix(runif(8),nrow=2,
    dimnames=list(LETTERS[1:2],letters[1:4])),digits=3),
    name=paste0('n',ii)));

これはそれらをプロットしますが、タイトルはありません:do.call(grid.arrange,c(baz,nrow=1))

textGrobs のリストを作成したり、それらの高さを計算したりするのはやり過ぎのように思えます。各テーブルのヘッダーの上に、そのテーブルに付けた名前を表示する余分な行を強制したいだけです。または、そうするための組み込みの引数。

4

0 に答える 0