如何重新排列 gtsummary 或 flextable 中的列？

Question

参考这个答案[置信区间] ()，如何重新排列 gtsummary 或 flextable 中的列？有一种方法可以使用 gt package（如下所示）来执行此操作，但不会编织到 Ms Word。有线索吗？

final_tbl %>% as_gt() %>%
  cols_move(
    columns = vars(Male_ci),
    after = vars(stat_1)
  )

Answer 1

下面是移动 gsummary 对象的一列的示例。此脚本将 p.value 列移动到 label 列

之后

library(gtsummary)
packageVersion("gtsummary")
#> '1.4.0'

# build table
tbl <-
  trial %>%
  select(age, trt) %>%
  tbl_summary(by = trt, missing = "no") %>%
  add_p() 

# move p.value column
tbl %>%
  modify_table_body(~.x %>% dplyr::relocate(p.value, .after = label))

如何重新排列 gtsummary 或 flextable 中的列？

How do I rearrange columns in gtsummary or flextable?

r

flextable

gtsummary