Блог

 library(tidyverse)
library(reprex)
y <-c('A','B','C','A')
x <-c('male','male','female',NA)
df <- as.data.frame(cbind(x,y))
reprex()
tbl_summary(df)
  

Вывод

Я хочу добавить 100% рядом с N = 4. Как я могу это сделать?

Если ваши заголовки всегда будут суммироваться до 100%, вы можете попробовать изменить заголовок, чтобы добавить ‘(100%)’ вручную:

 tbl_summary(df) %>% 
  modify_header(update = "stat_0" ~ "N = {n} (100%)")
  

Для других сценариев modify_header() функция в gtsummary должна быть способна делать то, что вы хотите.