R gtsummary 整体列在合并后移动

问题描述

过去，当我创建一个带有整体列的汇总表并将其合并时，该列仍保留在左侧。但是最近合并修改spanning header后，整体列不在左边。

这是一个例子：

library(gtsummary)

t1 <- trial %>% select(trt,age) %>% 
  tbl_summary(
    by = trt) %>% 
  add_overall(col_label = "**Overall**") %>% 
  modify_header(stat_by = "**{level}**") 

t2 <- trial %>% select(grade,age) %>% 
  tbl_summary(
    by = grade) %>% 
  modify_header(stat_by = "**{level}**") 

tbl_merge(
    tbls = list(t1,t2),tab_spanner = c("**Treatment**","**Tumor Grade**")
  ) %>%
  modify_spanning_header(stat_0_1 ~ NA) %>%
  modify_footnote(everything() ~ NA)

看合并前的第一张表（t1），整体列在左边：

一旦发生合并，整个列就移动了：

我使用的代码与之前 post 中建议的代码相同。最近的包更新有什么变化吗，我的代码中是否有可能是罪魁祸首的东西，或者是否有解决方法可以让整个列位于左侧？

谢谢，

本

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

gtsummary r r summary