如何在gtsummary表格中以指数形式展示连续变量统计结果

可以通过gtsummary的modify_fmt_fun()函数自定义数值格式，实现指数形式展示中位数/IQR的需求，具体代码如下：

library(tidyverse)
library(gtsummary)
library(scales)

df <- tibble(x = letters[1:10], 
             y = c(0.00000e+00, 2.16934e-05,
                   0.00000e+00, 0.00000e+00,
                   0.00000e+00, 0.00000e+00,
                   4.04793e-05, 0.00000e+00,
                   8.53971e-05, 2.02867e-04))

df %>% 
  select(y) %>% 
  tbl_summary(type = everything() ~ "continuous",
              statistic = all_continuous() ~ "{median} ({p25}, {p75})") %>% # 明确指定中位数/IQR的输出格式
  modify_fmt_fun(
    all_continuous() ~ function(x) scientific(x, digits = 6) # 用科学计数法格式化，保留6位有效数字
  )

补充说明 #

• statistic参数用来明确统计量的输出结构，确保后续格式化能精准作用到中位数和四分位数上
• 若不想额外加载scales包，也可以用base R的sprintf()自定义格式，示例如下：

  modify_fmt_fun(
    all_continuous() ~ function(x) sprintf("%.6e", x)
  )
  

  其中%.6e代表保留6位小数的指数形式，可根据需求调整位数。

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