R语言-三线表全自动绘制

{gtsummary}使用tbl_summary（）汇总数据

并排回归模型 您还可以使用tbl_merge（）呈现并排回归模型结果

library(survival)#> Warning: package 'survival' was built under R version 4.0.3# build survival model tablet2 <-

coxph(Surv(ttdeath, death) ~ trt + grade + age, trial) %>%

tbl_regression(exponentiate = TRUE)# merge tables tbl_merge_ex1 <-

tbl_merge(

tbls = list(t1, t2),

tab_spanner = c("**Tumor Response**", "**Time to Death**")

)