Package: gtsummary Check: examples New result: ERROR Running examples in ‘gtsummary-Ex.R’ failed The error most likely occurred in: > base::assign(".ptime", proc.time(), pos = "CheckExEnv") > ### Name: tbl_strata_nested_stack > ### Title: Stratified Nested Stacking > ### Aliases: tbl_strata_nested_stack > > ### ** Examples > > # Example 1 ---------------------------------- > tbl_strata_nested_stack( + trial, + strata = trt, + .tbl_fun = ~ .x |> + tbl_summary(include = c(age, grade), missing = "no") |> + modify_header(all_stat_cols() ~ "**Summary Statistics**") + ) Error in `tbl_strata_nested_stack()`: ! The `x` argument must be class , not a tibble. Backtrace: ▆ 1. └─gtsummary::tbl_strata_nested_stack(...) 2. ├─rlang::set_names(...) 3. └─gtsummary:::map(...) 4. └─base::lapply(.x, .f, ...) 5. └─gtsummary (local) FUN(X[[i]], ...) 6. ├─dplyr::select(...) 7. └─cards::rename_ard_columns(...) 8. └─cards:::check_class(x, "card") 9. └─cli::cli_abort(...) 10. └─rlang::abort(...) Execution halted Package: gtsummary Check: tests New result: ERROR Running ‘spelling.R’ [0s/0s] Running ‘testthat.R’ [15s/9s] Running the tests in ‘tests/testthat.R’ failed. Complete output: > # This file is part of the standard setup for testthat. > # It is recommended that you do not modify it. > # > # Where should you do additional test configuration? > # Learn more about the roles of various files in: > # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview > # * https://testthat.r-lib.org/articles/special-files.html > > library(testthat) > library(gtsummary) Attaching package: 'gtsummary' The following object is masked from 'package:testthat': matches > > test_check("gtsummary", stop_on_warning = TRUE) Starting 2 test processes [ FAIL 2 | WARN 0 | SKIP 95 | PASS 41 ] ══ Skipped tests (95) ══════════════════════════════════════════════════════════ • On CRAN (95): 'test-add_ci.tbl_summary.R:1:1', 'test-add_ci.tbl_svysummary.R:1:1', 'test-add_difference.tbl_summary.R:1:1', 'test-add_difference.tbl_svysummary.R:1:1', 'test-add_glance.R:1:1', 'test-add_global_p.tbl_regression.R:1:1', 'test-add_global_p.tbl_uvregression.R:1:1', 'test-add_n.tbl_regression.R:1:1', 'test-add_n.tbl_summary.R:1:1', 'test-add_n.tbl_survfit.R:1:1', 'test-add_n.tbl_svysummary.R:1:1', 'test-add_n.tbl_uvregression.R:1:1', 'test-add_nevent.tbl_regression.R:1:1', 'test-add_nevent.tbl_survfit.R:1:1', 'test-add_nevent.tbl_uvregression.R:1:1', 'test-add_overall.tbl_ard_summary.R:1:1', 'test-add_overall.tbl_continuous.R:1:1', 'test-add_overall.tbl_custom_summary.R:1:1', 'test-add_overall.tbl_hierarchical.R:1:1', 'test-add_overall.tbl_summary.R:1:1', 'test-add_overall.tbl_svysummary.R:1:1', 'test-add_p.tbl_continuous.R:1:1', 'test-add_p.tbl_cross.R:1:1', 'test-add_p.tbl_summary.R:1:1', 'test-add_p.tbl_survfit.R:1:1', 'test-add_q.R:1:1', 'test-add_p.tbl_svysummary.R:1:1', 'test-add_significance_stars.R:1:1', 'test-add_stat.R:1:1', 'test-add_stat_label.R:1:1', 'test-add_stat_label.tbl_ard_summary.R:1:1', 'test-add_stat_label.tbl_svysummary.R:1:1', 'test-add_vif.R:1:1', 'test-as_flex_table.R:1:1', 'test-as_gt.R:1:1', 'test-as_hux_table.R:1:1', 'test-as_kable.R:1:1', 'test-as_kable_extra.R:1:1', 'test-as_tibble.R:1:1', 'test-bold_italicize_labels_levels.R:1:1', 'test-bold_p.R:1:1', 'test-combine_terms.R:1:1', 'test-custom_tidiers.R:1:1', 'test-gather_ard.R:1:1', 'test-inline_text.R:1:1', 'test-label_style.R:1:1', 'test-modify_abbreviation.R:1:1', 'test-modify_caption.R:1:1', 'test-modify_column_alignment.R:1:1', 'test-modify_column_hide.R:1:1', 'test-modify_column_indent.R:1:1', 'test-modify_column_merge.R:1:1', 'test-modify_fmt_fun.R:1:1', 'test-modify_footnote.R:1:1', 'test-modify_footnote_body.R:1:1', 'test-modify_footnote_header.R:1:1', 'test-modify_footnote_spanning_header.R:1:1', 'test-modify_header.R:1:1', 'test-modify_source_note.R:1:1', 'test-modify_spanning_header.R:1:1', 'test-modify_table_body.R:1:1', 'test-modify_table_styling.R:1:1', 'test-plot.tbl_regression.R:1:1', 'test-plot.tbl_uvregression.R:1:1', 'test-remove_row_type.R:1:1', 'test-scoping_gtsummary.R:1:1', 'test-select_helpers.R:1:1', 'test-separate_p_footnotes.R:1:1', 'test-show_header_names.R:1:1', 'test-sort_filter_p.R:1:1', 'test-style_pvalue.R:49:3', 'test-tbl_ard_continuous.R:1:1', 'test-tbl_ard_hierarchical.R:1:1', 'test-tbl_ard_summary.R:1:1', 'test-tbl_ard_wide_summary.R:1:1', 'test-tbl_butcher.R:1:1', 'test-tbl_continuous.R:1:1', 'test-tbl_cross.R:1:1', 'test-tbl_custom_summary.R:1:1', 'test-tbl_hierarchical.R:1:1', 'test-tbl_likert.R:1:1', 'test-tbl_merge.R:1:1', 'test-tbl_regression.R:1:1', 'test-tbl_regression_methods.R:1:1', 'test-tbl_split.R:1:1', 'test-tbl_stack.R:1:1', 'test-tbl_strata.R:1:1', 'test-tbl_summary.R:1:1', 'test-tbl_survfit.R:1:1', 'test-tbl_svysummary.R:1:1', 'test-tbl_uvregression.R:1:1', 'test-tbl_wide_summary.R:1:1', 'test-theme_elements_gtsummary.R:1:1', 'test-theme_gtsummary.R:1:1', 'test-tbl_strata_nested_stack.R:110:3' ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-tbl_strata_nested_stack.R:2:3'): tbl_strata_nested_stack() works ── Error in `tbl_strata_nested_stack(trial, strata = trt, ~modify_header(tbl_summary(.x, include = c(age, grade), missing = "no"), all_stat_cols() ~ "**Summary Statistics**"))`: The `x` argument must be class , not a tibble. Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-tbl_strata_nested_stack.R:2:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. └─gtsummary::tbl_strata_nested_stack(...) 10. ├─rlang::set_names(...) 11. └─gtsummary:::map(...) 12. └─base::lapply(.x, .f, ...) 13. └─gtsummary (local) FUN(X[[i]], ...) 14. ├─dplyr::select(...) 15. └─cards::rename_ard_columns(...) 16. └─cards:::check_class(x, "card") 17. └─cli::cli_abort(...) 18. └─rlang::abort(...) ── Error ('test-tbl_strata_nested_stack.R:83:3'): tbl_strata_nested_stack() works with unobserved factor levels ── Error in `tbl_strata_nested_stack(dplyr::mutate(trial, trt = factor(trt, levels = c("Drug A", "Drug B", "Drug C"))), strata = trt, ~modify_header(tbl_summary(.x, include = c(age, grade), missing = "no"), all_stat_cols() ~ "**Summary Statistics**"))`: The `x` argument must be class , not a tibble. Backtrace: ▆ 1. ├─testthat::expect_silent(...) at test-tbl_strata_nested_stack.R:83:3 2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise) 3. │ ├─testthat (local) .capture(...) 4. │ │ ├─withr::with_output_sink(...) 5. │ │ │ └─base::force(code) 6. │ │ ├─base::withCallingHandlers(...) 7. │ │ └─base::withVisible(code) 8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo)) 9. └─gtsummary::tbl_strata_nested_stack(...) 10. ├─rlang::set_names(...) 11. └─gtsummary:::map(...) 12. └─base::lapply(.x, .f, ...) 13. └─gtsummary (local) FUN(X[[i]], ...) 14. ├─dplyr::select(...) 15. └─cards::rename_ard_columns(...) 16. └─cards:::check_class(x, "card") 17. └─cli::cli_abort(...) 18. └─rlang::abort(...) [ FAIL 2 | WARN 0 | SKIP 95 | PASS 41 ] Error: Test failures Execution halted