私は行列 data.list のリストを持っていて、それらをタイトル付きで次々とPDFに表示しようとしています。リストの要素は、row.vector と呼ばれるリストの要素によってインデックス付けされます。
これが私のコードです：
pdf("data.pdf", height = 11, width = 8.5)
for (i in 1:length(row.vector)) {
grid.arrange(tableGrob(data.list[[row.vector[[i]]]], gp=gpar(fontsize=6)), main = row.vector[[i]])
}
dev.off()
これには 2 つの問題があります。- すべてのマトリックスは、ページを保証するのに十分な大きさではないという事実にもかかわらず、別々のページに表示されます。次々と表示させたい。- タイトルはページの上部にあり、表の真上に配置したい。また、テーブルの間に表示されるグラフを入れたいです（テーブルやグラフが横に並んでいません）。
テストリストは次のとおりです。
row.vector <- list("first", "second", "third")
a <- matrix(nrow = 4, ncol = 3)
a[1,] <- c(3,4,5)
a[2,] <- c(6,7,8)
a[3,] <- c(1,1,1)
a[4,] <- c(1,1,1)
b<- matrix(nrow = 2, ncol = 3)
b[1,] <- c("a","x","y")
b[2,] <- c("d","d","d")
c <- matrix(nrow = 10, ncol = 2)
c[,1] <- 1:10
c[,2] <- 11:20
data.list <- list("first" = a,"second"=b,"third"=c)