如何将 gt 表保存到 excel 或 word 文件

将我漂亮的表格提交给出版商后,他们希望它们在 word 或 excel 文件中。有没有一种简单的方法可以将 gt 表保存为任何一种格式,或者我最好在 excel 中重做它们?

stack overflow How to save a gt table to either an excel or word file
原文答案

答案:

作者头像

以下是将 gtsummary 表导出到 excel 或 RTF 的一些选项:

library(gtsummary)
library(writexl)

gt_table <- trial %>% 
  tbl_summary() 

# Export to Excel ----

# convert to tibble, then write to xlsx
gt_table %>%
  gtsummary::as_tibble() %>% 
  writexl::write_xlsx(., "example_gtsummary1.xlsx")

# Or use `as_hux_xlsx()`
gt_table %>% 
  as_hux_xlsx("example_gtsummary2.xlsx")

# Export to RTF ----
gt_table %>%
  gtsummary::as_gt() %>% 
  gt::gtsave(., "example_gtsummary3.rtf")

有关这篇文章中第一个选项的更多详细信息: https://www.pipinghotdata.com/posts/2021-07-14-polished-summary-tables-in-r-with-gtsummary/