diff --git a/R/tm_t_summary.R b/R/tm_t_summary.R index e545d8c413..3ac23cd14f 100644 --- a/R/tm_t_summary.R +++ b/R/tm_t_summary.R @@ -348,7 +348,7 @@ ui_summary <- function(id, ...) { "25% and 75%-ile" = "quantiles", "Min - Max" = "range" ), - selected = a$numeric_stats + selected = c("n", "mean_sd", "median", "range") ), radioButtons( ns("denominator"), diff --git a/R/tm_t_summary_by.R b/R/tm_t_summary_by.R index 59072d9097..c9f12982dc 100644 --- a/R/tm_t_summary_by.R +++ b/R/tm_t_summary_by.R @@ -517,7 +517,7 @@ ui_summary_by <- function(id, ...) { "25% and 75%-ile" = "quantiles", "Min - Max" = "range" ), - selected = a$numeric_stats + selected = c("n", "mean_sd", "median", "range") ), if (a$dataname == a$parentname) { shinyjs::hidden(