如何配置tbl_summary避免为4位及以上数字添加空格？

这个问题是因为tbl_summary默认用空格作为千位分隔符格式化数字，可通过以下两种方式解决：

方式一：单独修改当前表格的数字格式 #

直接在statistic参数里指定数字格式化规则，用style_number函数并设置big.mark = ''来去除分隔空格：

base %>%
    select(triajedic,
           residencia_dico,
           Posee_OS) %>%
    mutate_all(as.factor) %>%
    tbl_summary(by= triajedic,
                missing = "always",
                statistic = list(all_categorical() ~ "{style_number(n, big.mark = '')}"),
                missing_text= "Casos perdidos",
                digits = list(all_categorical() ~ c(0,1))) %>%
    add_overall()

方式二：全局设置默认数字格式 #

如果希望所有tbl_summary生成的表格都采用无分隔符的数字格式，可配置gtsummary主题：

set_gtsummary_theme(
  theme = list(
    fmt_number = function(x) style_number(x, big.mark = "")
  )
)

设置后，后续所有tbl_summary输出的数字都会自动去掉千位分隔空格，不用再单独调整每个表格的参数。

内容的提问来源于stack exchange，提问作者mala fama