我想将格式化好的表格打印到图形设备。我知道这里有textplot()
,但是似乎不支持tabular()
包中的tables
函数,该函数用于组装表。
有没有解决方法,也许还有另外一对功能可以在这里为我提供帮助?
编辑:
这是我要执行的操作的一个示例:
dat <- data.frame(
id=paste("id", 1:10),
loc=sample(c("north", "south"), 10, replace=TRUE),
val1=rnorm(10),
val2=rnorm(10)
)
tab <- tabular(id + 1 ~ (val1 + val2)*loc*sum, data=dat)
#textplot(tab) # won't do it
(对表格的调用将变得更加复杂,我目前正在逐步学习中...)
任何提示表示赞赏!我现在正在考虑将
text
与等宽字体一起使用,但是也许还有更好的方法吗?编辑2:
这是公认的解决方案:
textplot(capture.output(tab))
最佳答案
您可以将capture.output
与tabular
输出的打印形式一起使用,然后将结果传递给textplot。或者,您可以将表格格式的结果转换为矩阵,然后将其传递给plotrix包中的addtable2plot
函数。
关于r - 有没有办法将gplots::textplot与table::tabular一起使用?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/9793311/