如何使用gtsummary::inline_text引用分层表格的表头N值

虽然inline_text没有专门参数直接提取表头N值，但通过指定statistic = "{N}"参数，就能简洁获取任意列（包括Overall和分层组）的总样本量：

提取单个N值 #

library(palmerpenguins)
library(gtsummary)

# 生成目标表格
tab <- tbl_summary(
  penguins,
  include = c(species, bill_length_mm),
  by = island 
) %>%
  add_overall()

# 提取Overall列的N值
inline_text(tab, variable = "species", column = "Overall", statistic = "{N}")

# 提取Biscoe岛分组的N值
inline_text(tab, variable = "species", column = "Biscoe", statistic = "{N}")

说明 #

• 选择任意一个已纳入表格的变量（比如示例中的species）即可，{N}会返回对应列的总样本量，与具体变量无关
• 替换column参数的值为目标分组名，就能提取对应分层的N值

批量提取所有分组N值 #

如果需要一次性获取所有分组的N值，可结合purrr批量处理：

library(purrr)

# 获取所有列名（包括Overall和分层组）
group_names <- tab$table_header$column %>% unique()

# 批量提取N值
map(group_names, ~inline_text(tab, variable = "species", column = .x, statistic = "{N}"))

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