grid.arrange（）图和表重叠

Question

这是我在Stack上的第一篇文章，所以任何帮助都将不胜感激。如果我需要重新解释我的问题或更具体，请告诉我。

我正在尝试创建一个包含情节和与该情节相关的表格的图形。我能够制作情节，但我的桌子太长，随后与我的条形图重叠。下面是重现问题的虚拟代码。

我的问题是这个。有没有办法将我的桌子分成n个部分，以便它整齐地放在我的条形图下面？我有几个数据框来执行此操作以获得不同的大小，因此不建议使用手动行方式子设置来生成多个表。任何帮助将不胜感激。

catg <- rnorm(50)
amts <- rnorm(50)
data <- data.frame(catg,amts)

plt1 <- ggplot(data,aes(x=catg,y=amts))+
      geom_bar(stat="identity", width=0.1)

tbl1 <- tableGrob(amts)

grid.arrange(plt1,tbl1)

Answer 1

我不知道你的想法，但可能会将这些值重塑为N列（并围绕数字）？

grid.table(matrix(round(amts,3), ncol=5))