diff --git a/tests/testthat/_snaps/tm_t_summary_by.md b/tests/testthat/_snaps/tm_t_summary_by.md index c6ad2e6971..58961b8ef1 100644 --- a/tests/testthat/_snaps/tm_t_summary_by.md +++ b/tests/testthat/_snaps/tm_t_summary_by.md @@ -54,13 +54,12 @@ $layout lyt <- rtables::basic_table(title = "Summary Table for AVAL, CHG by AVISIT") %>% - rtables::split_cols_by("ARM") %>% rtables::add_overall_col("All Patients") %>% - rtables::add_colcounts() %>% rtables::split_rows_by("AVISIT", - split_label = teal.data::col_labels(adlb, fill = FALSE)[["AVISIT"]], - split_fun = split_fun, label_pos = "topleft") %>% split_cols_by_multivar(vars = c("AVAL", - "CHG")) %>% summarize_colvars(vars = c("AVAL", "CHG"), na.rm = FALSE, - denom = "N_col", .stats = c("n", "mean_sd", "mean_ci", "median", - "median_ci", "quantiles", "range", "count_fraction"), + rtables::split_cols_by("ARM") %>% rtables::add_colcounts() %>% + rtables::split_rows_by("AVISIT", split_label = teal.data::col_labels(adlb, + fill = FALSE)[["AVISIT"]], split_fun = split_fun, label_pos = "topleft") %>% + split_cols_by_multivar(vars = c("AVAL", "CHG")) %>% summarize_colvars(vars = c("AVAL", + "CHG"), na.rm = FALSE, denom = "N_col", .stats = c("n", "mean_sd", + "mean_ci", "median", "median_ci", "quantiles", "range", "count_fraction"), na_str = "") $table