更改 gtsummary table 中的摘要统计信息

change the summary statistics in gtsummary table

我用 gtsummary 创建了一个摘要 table。但我想对汇总统计数据进行一些更改。我希望 % 是每个级别的总和的百分比,而不是整个变量。 对于 1 年级,总和为 68。因此对于药物 A,我希望它是 35(51.47%) (35/68x100)。同样,对于药物 B,它会显示 33 (48.53%)。 我该怎么做?非常感谢!

library(gtsummary)
data(trial)
trial2 <- trial %>% select(trt, grade)
trial2 %>%
  tbl_summary(
    by = trt,
    statistic = list(all_categorical() ~ "{n} ({p}%)"))

您可以将 percent = "row" 添加到您的 tbl_summary 通话中

trial2 %>%
  tbl_summary(
    by = trt,
    statistic = list(all_categorical() ~ "{n} ({p}%)"),
    percent = 'row')