我在绘制简单摘要时遇到问题。
library(gridExtra)
SummaryTable <- summary(s.tvs$precio.nuevo)
grid.table(SummaryTable)
给我这个:
我想实现这样的目标:
最佳答案
升级评论:
grid.table 调用 tableGrob。
grid.table
#function (...)
#grid.draw(tableGrob(...))
#<environment: namespace:gridExtra>
从 ?tableGrob 开始，它的第一个参数是矩阵或 data.frame。 t 将 summary 返回的命名向量强制转换为一维矩阵。或者，您可以使用 as.matrix 来生成具有一列的矩阵。
grid.newpage()
grid.table(t(summary(mtcars$mpg)))
grid.newpage()
grid.table(as.matrix(summary(mtcars$mpg)))
来自评论:
问题:
我正在尝试绘制条形图和此答案中生成的表格。我得到:此代码:grid.arrange(a, tbl, ncol = 1)
要使用 grid.arrange 组合不同的表/图，它们需要是 grobs(网格 GRaphcal 对象)。因此，您不能将结果从 grid.table 传递到 grid.arrange，因为它不是 grob(它实际上直接绘制了 tableGrob)。为此，您需要传递 tableGrob。
例如:
mybar <- qplot(mtcars$mpg, geom="bar")
tbl <- tableGrob(t(summary(mtcars$mpg)))
grid.newpage()
grid.arrange(mybar, tbl)
关于R: gridExtra - 如何将摘要绘制为表格？，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/32926718/