在今天的文章中,将介绍一个函数,实现一行代码出Cox回归模型的表格,作为对前人的缅怀和致敬!
首先,安装和载入相关R包:
# 安装
install.packages("gtsummary")
# 载入
library(gtsummary)
library(survival)
后续会使用{gtsummary}中的数据集“trial”,首先查看一下概况:
summary(trial)
下一步,建立一个Cox回归模型:
cox_model <- coxph(Surv(ttdeath, death) ~ age + stage + trt, trial)
最后,将上述的模型结果制作表格:
tbl_regression(cox_model, exponentiate = TRUE)