Я хочу создать таблицу сводной статистики с summary_table.Это должно иметь подзаголовки.
Я следовал этому примеру: https://cran.r -project.org / web / packages / qwraps2 / vignettes / summary-statistics.html
stats_summary1 <-
list("Sex (female)" =
list("number (%)" = ~ qwraps2::n_perc(.data$sex=="F", digits = 1)),
"Age" =
list("min" = ~ min(.data$age_d, digits = 1),
"max" = ~ max(.data$age_d, digits = 1),
"median (IQR)" = ~ qwraps2::median_iqr(.data$age_d, digits = 1)),
"Disease" =
list("A" = ~ qwraps2::n_perc(.data$d==1, digits = 1),
"B" = ~ qwraps2::n_perc(.data$d==2, digits = 1),
"C" = ~ qwraps2::n_perc(.data$d==3, digits = 1),
"D" = ~ qwraps2::n_perc(.data$d==4, digits = 1),
"E" = ~ qwraps2::n_perc(.data$d==5, digits = 1)),
"Disease duration" =
list("min" = ~ min(.data$dis_dur, digits = 1),
"max" = ~ max(.data$dis_dur, digits = 1),
"median (IQR)" = ~ qwraps2::median_iqr(.data$dis_dur, digits = 1))
)
whole <- summary_table(df, stats_summary1)
вывод таблицы не включает подзаголовки, например, «Болезнь».Это также производит процент с косой чертой, например.65 \%