R swave:道具表xtable中的位数

R swave:道具表xtable中的位数,r,digits,xtable,R,Digits,Xtable,我正在R swave上制作一个xtableFtable,但找不到用此代码抑制数字的方法。我在做什么?我已经读到,如果您的值不是数字而是因子或字符,而是prop.table使其非数字,则可能发生这种情况?我迷路了 library(xtable) a <- ftable(prop.table(table(mtcars$mpg, mtcars$hp), margin=2)*100) b <- xtableFtable(a, method = "compact", digits = 0) p

我正在R swave上制作一个
xtableFtable
,但找不到用此代码抑制数字的方法。我在做什么?我已经读到,如果您的值不是数字而是因子或字符,而是
prop.table
使其非数字,则可能发生这种情况?我迷路了

library(xtable)
a <- ftable(prop.table(table(mtcars$mpg, mtcars$hp), margin=2)*100)
b <- xtableFtable(a, method = "compact", digits = 0)
print.xtableFtable(b, rotate.colnames = TRUE)
库(xtable)

a您可以使用
选项(数字)
来控制要打印多少数字。尝试将
options(digits=4)
作为代码的第一行(将
4
更改为
1
22
之间的任意值)。有关更多信息,请参见
?选项

或在打印前对值进行四舍五入

a = round(ftable(prop.table(table(mtcars$mpg, mtcars$hp), margin=2)*100), 2)
b = xtableFtable(a, method = "compact")
print.xtableFtable(b, rotate.colnames = TRUE)
xtableFtable
的“digits”参数似乎没有实现(从我的版本1.8.3开始),因为在玩了半个小时之后,似乎没有什么不同

函数文档中对此有一个提示:

不建议用户更改
对齐
数字
对齐
的值。首先,替代值尚未测试。其次,为了确定这些参数的适当值,用户必须调查
xtableFtable
和/或
print.xtableFtable
的代码


它可能是从
xtable
函数(该函数肯定是
xtableFtable
的基础)继承下来的,作为维护人员还没有解决的一项任务。

你是说尝试
b谢谢,它解决了我的问题!如果你写下来作为回答,我会接受:)