有什么方法可以在 tbl_regression 中显示 beta 估计的标准误差？

Question

我还没有看到任何使用 gtsummary::tbl_regression 打印模型估计的 SE 的方法。

在使用 tbl_regression 打印表格时，有没有办法将 SE 添加到模型输出列？

library(gtsummary)
test <- with(trial, lm(marker~trt+age))
tbl_regression(test)

Answer 1

在当前的 gtsummary 开发版本中隐藏和取消隐藏列变得更加容易（虽然在 v1.3.5 中是可能的，但它需要更多地了解 gtsummary 的内部结构）。我建议安装开发版并执行下面的代码。

您可以隐藏或取消隐藏 x$table_body 中的任何列（其中 x 是 gtsummary 对象）。在几乎每个回归模型中，都有一个名为 "std.error" 的隐藏列，下面的代码打印该列。

http://www.danieldsjoberg.com/gtsummary/dev/reference/modify_column_hide.html

remotes::install_github("ddsjoberg/gtsummary")
library(gtsummary)
packageVersion("gtsummary")
#> [1] "1.3.5.9014"

# hide 95% CI, and replace with standard error
modify_column_hide_ex1 <-
  lm(age ~ marker + grade, trial) %>%
  tbl_regression() %>%
  modify_column_hide(column = ci) %>%
  modify_column_unhide(column = std.error)