我还没有看到任何方法来打印模型估计的 SE 使用gtsummary::tbl_regression
.
使用打印表格时,有什么方法可以将 SE 添加到模型输出列tbl_regression
?
library(gtsummary)
test <- with(trial, lm(marker~trt+age))
tbl_regression(test)
在当前的 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)