如何省略 R 中 table1 中的缺失值行

Question

我有一个数据集如下。当我使用 table1() 从中创建 table1 时，会给出一行用于缺失值。我想知道是否可以从变量之一（例如 var3）中排除“缺失行”。

我想这样做的原因是，在我的实际数据集中，我的住院时间是可变的。并非数据集中的所有个人都在医院，因此这些患者没有丢失数据，他们只是没有此变量的数据，因为他们不在医院提供数据。

如有任何帮助，我们将不胜感激，谢谢。

data <- data.frame(
  var1 = c(1, 2, NA, 4, 5),
  var2 = c("A", "B", NA, "D", "E"),
  var3 = c(10, NA, 30, 40, 50)
)

table1(~var1 + var2 + var3, data=data) 

Answer 1

使用

render.missing = NULL

（由于某种原因，它不在帮助 (

?table1::table1

) 中！）：

table1::table1(~var1 + var2 + var3, data=data, render.missing = NULL) 

Answer 2

仅排除 var3 的缺失行：

rndr <- function(x, name, ...) {
    if (name=="var3") {
        render.default(x, name, ..., render.missing=NULL)
    } else {
        render.default(x, name, ...)
    }
}

table1(~var1 + var2 + var3, data=data, render=rndr)

Answer 3

render.missing=NULL 禁止打印包含缺失值的行，但不会从计算中排除缺失值（百分比或总计）。有没有办法从计算中排除缺失值？