Running ‘testthat.R’ [219s/175s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > test_check("cardx", stop_on_warning = TRUE)
  Loading required package: cardx
  Starting 2 test processes.
  Saving _problems/test-ard_categorical_ci.survey.design-28.R
  > test-ard_categorical_ci.data.frame.R: 5 missing observations in the "am" column have been removed.
  Saving _problems/test-ard_categorical_ci.data.frame-202.R
  Saving _problems/test-ard_categorical_ci.data.frame-224.R
  Saving _problems/test-ard_categorical_ci.data.frame-287.R
  Saving _problems/test-ard_categorical_ci.data.frame-309.R
  Saving _problems/test-ard_continuous_ci.survey.design-39.R
  > test-ard_effectsize_hedges_g.R: For paired samples, 'repeated_measures_d()' provides more options.
  > test-ard_effectsize_cohens_d.R: For paired samples, 'repeated_measures_d()' provides more options.
  Saving _problems/test-ard_missing.survey.design-14.R
  Saving _problems/test-ard_missing.survey.design-15.R
  Saving _problems/test-ard_missing.survey.design-113.R
  Saving _problems/test-ard_missing.survey.design-146.R
  > test-ard_stats_oneway_test.R: Multiple parameters; naming those columns num.df and den.df.
  Saving _problems/test-ard_stats_t_test_onesample-49.R
  Saving _problems/test-ard_stats_wilcox_test_onesample-51.R
  Saving _problems/test-ard_summary.survey.design-18.R
  Saving _problems/test-ard_summary.survey.design-19.R
  Saving _problems/test-ard_summary.survey.design-90.R
  Saving _problems/test-ard_summary.survey.design-91.R
  Saving _problems/test-ard_summary.survey.design-256.R
  Saving _problems/test-ard_summary.survey.design-262.R
  Saving _problems/test-ard_summary.survey.design-302.R
  Saving _problems/test-ard_summary.survey.design-315.R
  Saving _problems/test-ard_summary.survey.design-331.R
  Saving _problems/test-ard_summary.survey.design-346.R
  Saving _problems/test-ard_summary.survey.design-374.R
  Saving _problems/test-ard_summary.survey.design-406.R
  Saving _problems/test-ard_summary.survey.design-519.R
  Saving _problems/test-ard_summary.survey.design-540.R
  > test-ard_tabulate_max.R: `AESEV`: "MILD" < "MODERATE" < "SEVERE"
  Saving _problems/test-ard_tabulate_max-194.R
  Saving _problems/test-ard_tabulate_max-244.R
  Saving _problems/test-ard_tabulate.survey.design-21.R
  Saving _problems/test-ard_tabulate.survey.design-22.R
  Saving _problems/test-ard_tabulate.survey.design-484.R
  Saving _problems/test-ard_tabulate.survey.design-485.R
  Saving _problems/test-ard_tabulate.survey.design-780.R
  Saving _problems/test-ard_tabulate.survey.design-781.R
  Saving _problems/test-ard_tabulate.survey.design-1071.R
  Saving _problems/test-ard_tabulate.survey.design-1072.R
  Saving _problems/test-ard_tabulate.survey.design-1229.R
  Saving _problems/test-ard_tabulate.survey.design-1310.R
  Saving _problems/test-ard_tabulate.survey.design-1325.R
  Saving _problems/test-ard_tabulate.survey.design-1343.R
  Saving _problems/test-ard_tabulate.survey.design-1387.R
  Saving _problems/test-ard_total_n.survey.design-7.R
  Saving _problems/test-ard_total_n.survey.design-15.R
  Saving _problems/test-ard_total_n.survey.design-37.R
  Saving _problems/test-ard_tabulate_value.survey.design-21.R
  Saving _problems/test-ard_tabulate_value.survey.design-25.R
  Saving _problems/test-ard_tabulate_value.survey.design-640.R
  Saving _problems/test-ard_tabulate_value.survey.design-644.R
  Saving _problems/test-ard_tabulate_value.survey.design-799.R
  [ FAIL 49 | WARN 0 | SKIP 59 | PASS 327 ]
  
  ══ Skipped tests (59) ══════════════════════════════════════════════════════════
  • On CRAN (59): 'test-ard_attributes.survey.design.R:3:1',
    'test-ard_aod_wald_test.R:3:1', 'test-ard_car_vif.R:3:1',
    'test-ard_car_vif.R:28:1', 'test-ard_car_anova.R:3:1',
    'test-ard_car_anova.R:15:1', 'test-ard_categorical_ci.survey.design.R:6:1',
    'test-ard_continuous_ci.survey.design.R:6:1',
    'test-ard_continuous_ci.survey.design.R:193:1',
    'test-ard_effectsize_hedges_g.R:3:1', 'test-ard_effectsize_cohens_d.R:3:1',
    'test-ard_emmeans_contrast.R:3:1', 'test-ard_emmeans_contrast.R:100:1',
    'test-ard_emmeans_emmeans.R:3:1', 'test-ard_emmeans_emmeans.R:93:1',
    'test-ard_incidence_rate.R:7:1', 'test-ard_incidence_rate.R:43:1',
    'test-ard_incidence_rate.R:66:1', 'test-ard_proportion_ci.R:62:1',
    'test-ard_proportion_ci.R:112:1', 'test-ard_regression_basic.R:3:1',
    'test-ard_regression.R:3:1', 'test-ard_regression.R:40:1',
    'test-ard_stats_aov.R:3:1', 'test-ard_stats_kruskal_test.R:3:1',
    'test-ard_stats_mantelhaen_test.R:3:1', 'test-ard_stats_mood_test.R:3:1',
    'test-ard_stats_oneway_test.R:3:1', 'test-ard_stats_poisson_test.R:73:1',
    'test-ard_survey_svychisq.R:3:1', 'test-ard_survey_svyranktest.R:3:1',
    'test-ard_survival_survfit.R:3:1', 'test-ard_survival_survfit.R:16:1',
    'test-ard_survival_survfit.R:29:1', 'test-ard_survival_survfit.R:42:1',
    'test-ard_survival_survfit.R:64:1', 'test-ard_survival_survfit.R:90:1',
    'test-ard_survival_survfit.R:120:1', 'test-ard_survival_survfit.R:191:1',
    'test-ard_survival_survfit.R:201:1', 'test-ard_survival_survfit.R:221:1',
    'test-ard_survival_survfit.R:231:1', 'test-ard_survival_survfit_diff.R:36:1',
    'test-ard_tabulate_abnormal.R:5:1', 'test-ard_tabulate_abnormal.R:41:1',
    'test-ard_tabulate_max.R:1:1', 'test-ard_tabulate_max.R:60:1',
    'test-ard_tabulate_max.R:75:1', 'test-ard_tabulate_max.R:115:1',
    'test-ard_tabulate_max.R:210:1', 'test-ard_tabulate_max.R:258:1',
    'test-ard_tabulate.survey.design.R:421:1',
    'test-ard_tabulate.survey.design.R:1176:1',
    'test-ard_tabulate.survey.design.R:1410:1',
    'test-ard_tabulate_value.survey.design.R:736:1', 'test-proportion_ci.R:3:1',
    'test-proportion_ci.R:122:1', 'test-construction_helpers.R:3:1',
    'test-construction_helpers.R:103:1'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-ard_categorical_ci.survey.design.R:25:3'): ard_categorical_ci(variables) ──
  Error in `ard_categorical_ci(dclus1, variables = starts_with("xxxxxx"))`: The following columns are not present: "variable", "stat_name", "stat_label", "stat", "fmt_fun", "warning", and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-ard_categorical_ci.survey.design.R:25:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─cardx::ard_categorical_ci(dclus1, variables = starts_with("xxxxxx"))
    5. └─cardx:::ard_categorical_ci.survey.design(dclus1, variables = starts_with("xxxxxx"))
    6.   └─cards::as_card(dplyr::tibble())
    7.     └─cards::check_ard_structure(...)
    8.       └─cards:::.message_or_error(...)
    9.         └─cli::cli_abort(msg, call = call, .envir = envir)
   10.           └─rlang::abort(...)
  ── Failure ('test-ard_categorical_ci.data.frame.R:188:3'): ard_continuous_ci.data.frame(denominator='row') ──
  Expected `dplyr::arrange(...)` to equal `dplyr::arrange(...)`.
  Differences:
  `attr(actual, 'args')` is absent
  `attr(expected, 'args')` is a list
  
  ── Failure ('test-ard_categorical_ci.data.frame.R:205:3'): ard_continuous_ci.data.frame(denominator='row') ──
  Expected `dplyr::arrange(...)` to equal `dplyr::arrange(...)`.
  Differences:
  `attr(actual, 'args')` is absent
  `attr(expected, 'args')` is a list
  
  ── Failure ('test-ard_categorical_ci.data.frame.R:273:3'): ard_continuous_ci.data.frame(denominator='cell') ──
  Expected `dplyr::arrange(...)` to equal `dplyr::arrange(...)`.
  Differences:
  `attr(actual, 'args')` is absent
  `attr(expected, 'args')` is a list
  
  ── Failure ('test-ard_categorical_ci.data.frame.R:290:3'): ard_continuous_ci.data.frame(denominator='cell') ──
  Expected `dplyr::arrange(...)` to equal `dplyr::arrange(...)`.
  Differences:
  `attr(actual, 'args')` is absent
  `attr(expected, 'args')` is a list
  
  ── Error ('test-ard_continuous_ci.survey.design.R:36:3'): ard_continuous_ci(variables) ──
  Error in `ard_continuous_ci(dclus1, variables = starts_with("xxxxxx"))`: The following columns are not present: "variable", "stat_name", "stat_label", "stat", "fmt_fun", "warning", and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-ard_continuous_ci.survey.design.R:36:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─cardx::ard_continuous_ci(dclus1, variables = starts_with("xxxxxx"))
    5. └─cardx:::ard_continuous_ci.survey.design(dclus1, variables = starts_with("xxxxxx"))
    6.   └─cards::as_card(dplyr::tibble())
    7.     └─cards::check_ard_structure(...)
    8.       └─cards:::.message_or_error(...)
    9.         └─cli::cli_abort(msg, call = call, .envir = envir)
   10.           └─rlang::abort(...)
  ── Failure ('test-ard_missing.survey.design.R:11:3'): ard_missing.survey.design() works ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_missing.survey.design.R:11:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_missing(svy_titanic, variables = c(Class, Age), by = NULL)
    8. └─cardx:::ard_missing.survey.design(svy_titanic, variables = c(Class, Age), by = NULL)
    9.   ├─dplyr::mutate(...)
   10.   ├─cards::ard_tabulate(...)
   11.   └─cardx:::ard_tabulate.survey.design(...)
   12.     ├─cards::tidy_ard_row_order(...)
   13.     │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   14.     ├─cards::tidy_ard_column_order(...)
   15.     │ ├─dplyr::pull(...)
   16.     │ ├─dplyr::arrange(...)
   17.     │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   18.     │ └─dplyr::select(x, all_ard_groups())
   19.     ├─cards::as_card(...)
   20.     │ └─cards:::check_class(x, cls = "data.frame")
   21.     ├─dplyr::mutate(...)
   22.     └─cardx:::.restore_original_column_types(cards, data = data$variables)
   23.       └─cards::as_card(...)
   24.         └─cards::check_ard_structure(...)
   25.           └─cards:::.message_or_error(...)
   26.             └─cli::cli_abort(msg, call = call, .envir = envir)
   27.               └─rlang::abort(...)
  ── Error ('test-ard_missing.survey.design.R:15:3'): ard_missing.survey.design() works ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_svy_missing' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(...) at test-ard_missing.survey.design.R:15:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_svy_missing, method = FALSE)
  ── Error ('test-ard_missing.survey.design.R:110:3'): ard_missing.survey.design() follows ard structure ──
  Error in `cards::check_ard_structure(ard_missing(svy_titanic, variables = c(Class, Age), by = NULL), method = FALSE)`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_missing.survey.design.R:110: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. ├─cards::check_ard_structure(...)
   10. ├─cards::ard_missing(svy_titanic, variables = c(Class, Age), by = NULL)
   11. └─cardx:::ard_missing.survey.design(...)
   12.   ├─dplyr::mutate(...)
   13.   ├─cards::ard_tabulate(...)
   14.   └─cardx:::ard_tabulate.survey.design(...)
   15.     ├─cards::tidy_ard_row_order(...)
   16.     │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   17.     ├─cards::tidy_ard_column_order(...)
   18.     │ ├─dplyr::pull(...)
   19.     │ ├─dplyr::arrange(...)
   20.     │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   21.     │ └─dplyr::select(x, all_ard_groups())
   22.     ├─cards::as_card(...)
   23.     │ └─cards:::check_class(x, cls = "data.frame")
   24.     ├─dplyr::mutate(...)
   25.     └─cardx:::.restore_original_column_types(cards, data = data$variables)
   26.       └─cards::as_card(...)
   27.         └─cards::check_ard_structure(...)
   28.           └─cards:::.message_or_error(...)
   29.             └─cli::cli_abort(msg, call = call, .envir = envir)
   30.               └─rlang::abort(...)
  ── Error ('test-ard_missing.survey.design.R:118:3'): ard_missing.survey.design() works on design columns ──
  Error in `ard_missing(dplyr::tribble(~region, ~year, ~weights, 3, 1972, 0.663196271930943, 3, 1972, 0.917370028585327, 3, 1972, 0.897412512251031, 3, 1972, 1.06634082743438, 3, 1972, 0.94432371066466, 3, 1972, 0.526887241987567, 3, 1972, 0.526887241987567, 3, 1972, 0.546578869586901, 7, 1972, 0.283198307048893, 7, 1972, 0.494322145606406) %>% survey::svydesign(data = ., ids = ~region, strata = ~year, weights = ~weights, nest = TRUE), variables = weights)`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-ard_missing.survey.design.R:118:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::suppressWarnings(...)
    5. │ └─base::withCallingHandlers(...)
    6. ├─base::getElement(...)
    7. ├─dplyr::pull(...)
    8. ├─dplyr::filter(...)
    9. ├─cards::ard_missing(...)
   10. └─cardx:::ard_missing.survey.design(...)
   11.   ├─dplyr::mutate(...)
   12.   ├─cards::ard_tabulate(...)
   13.   └─cardx:::ard_tabulate.survey.design(...)
   14.     ├─cards::tidy_ard_row_order(...)
   15.     │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   16.     ├─cards::tidy_ard_column_order(...)
   17.     │ ├─dplyr::pull(...)
   18.     │ ├─dplyr::arrange(...)
   19.     │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   20.     │ └─dplyr::select(x, all_ard_groups())
   21.     ├─cards::as_card(...)
   22.     │ └─cards:::check_class(x, cls = "data.frame")
   23.     ├─dplyr::mutate(...)
   24.     └─cardx:::.restore_original_column_types(cards, data = data$variables)
   25.       └─cards::as_card(...)
   26.         └─cards::check_ard_structure(...)
   27.           └─cards:::.message_or_error(...)
   28.             └─cli::cli_abort(msg, call = call, .envir = envir)
   29.               └─rlang::abort(...)
  ── Error ('test-ard_stats_t_test_onesample.R:43:3'): ard_stats_t_test_onesample() works ──
  Error in `ard_stats_t_test_onesample(cards::ADSL, variables = character(0))`: The following columns are not present: "variable", "stat_name", "stat_label", "stat", "fmt_fun", "warning", and "error".
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-ard_stats_t_test_onesample.R:43:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─cardx::ard_stats_t_test_onesample(cards::ADSL, variables = character(0))
   5.   └─cards::as_card(dplyr::tibble())
   6.     └─cards::check_ard_structure(...)
   7.       └─cards:::.message_or_error(...)
   8.         └─cli::cli_abort(msg, call = call, .envir = envir)
   9.           └─rlang::abort(...)
  ── Error ('test-ard_stats_wilcox_test_onesample.R:45:3'): ard_stats_wilcox_test_onesample() works ──
  Error in `ard_stats_wilcox_test_onesample(cards::ADSL, variables = character(0))`: The following columns are not present: "variable", "stat_name", "stat_label", "stat", "fmt_fun", "warning", and "error".
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(...) at test-ard_stats_wilcox_test_onesample.R:45:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─cardx::ard_stats_wilcox_test_onesample(cards::ADSL, variables = character(0))
   5.   └─cards::as_card(dplyr::tibble())
   6.     └─cards::check_ard_structure(...)
   7.       └─cards:::.message_or_error(...)
   8.         └─cli::cli_abort(msg, call = call, .envir = envir)
   9.           └─rlang::abort(...)
  ── Failure ('test-ard_summary.survey.design.R:7:3'): unstratified ard_summary.survey.design() works ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_summary.survey.design.R:7:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_summary(...)
    8. └─cardx:::ard_summary.survey.design(...)
    9.   └─cardx:::.restore_original_column_types(...)
   10.     └─cards::as_card(...)
   11.       └─cards::check_ard_structure(...)
   12.         └─cards:::.message_or_error(...)
   13.           └─cli::cli_abort(msg, call = call, .envir = envir)
   14.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:19:3'): unstratified ard_summary.survey.design() works ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_uni_svy_cont' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(cards::check_ard_structure(ard_uni_svy_cont)) at test-ard_summary.survey.design.R:19:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_uni_svy_cont)
  ── Failure ('test-ard_summary.survey.design.R:78:3'): stratified ard_summary.survey.design() works ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_summary.survey.design.R:78:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_summary(...)
    8. └─cardx:::ard_summary.survey.design(...)
    9.   └─cardx:::.restore_original_column_types(...)
   10.     └─cards::as_card(...)
   11.       └─cards::check_ard_structure(...)
   12.         └─cards:::.message_or_error(...)
   13.           └─cli::cli_abort(msg, call = call, .envir = envir)
   14.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:91:3'): stratified ard_summary.survey.design() works ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_svy_cont' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(cards::check_ard_structure(ard_svy_cont)) at test-ard_summary.survey.design.R:91:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_svy_cont)
  ── Failure ('test-ard_summary.survey.design.R:245:3'): ard_summary.survey.design() NA handling ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_summary.survey.design.R:245:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_summary(...)
    8. └─cardx:::ard_summary.survey.design(...)
    9.   └─cardx:::.restore_original_column_types(...)
   10.     └─cards::as_card(...)
   11.       └─cards::check_ard_structure(...)
   12.         └─cards:::.message_or_error(...)
   13.           └─cli::cli_abort(msg, call = call, .envir = envir)
   14.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:258:3'): ard_summary.survey.design() NA handling ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_uni_NA_svy_cont' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_true(...) at test-ard_summary.survey.design.R:258:3
   2. │ └─testthat::quasi_label(enquo(object), label)
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─cardx:::map_lgl(...)
   5.   └─cardx:::.rlang_purrr_map_mold(.x, .f, logical(1), ...)
   6.     └─base::vapply(.x, .f, .mold, ..., USE.NAMES = FALSE)
  ── Failure ('test-ard_summary.survey.design.R:292:3'): ard_summary.survey.design() error handling ──
  Expected `ard_summary(...)` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_summary.survey.design.R:292:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_summary(...)
    8. └─cardx:::ard_summary.survey.design(...)
    9.   └─cardx:::.restore_original_column_types(...)
   10.     └─cards::as_card(...)
   11.       └─cards::check_ard_structure(...)
   12.         └─cards:::.message_or_error(...)
   13.           └─cli::cli_abort(msg, call = call, .envir = envir)
   14.             └─rlang::abort(...)
  ── Failure ('test-ard_summary.survey.design.R:304:3'): ard_summary.survey.design() error handling ──
  Expected `ard_summary(...)` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_summary.survey.design.R:304:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_summary(...)
    8. └─cardx:::ard_summary.survey.design(...)
    9.   └─cardx:::.restore_original_column_types(...)
   10.     └─cards::as_card(...)
   11.       └─cards::check_ard_structure(...)
   12.         └─cards:::.message_or_error(...)
   13.           └─cli::cli_abort(msg, call = call, .envir = envir)
   14.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:322:3'): ard_summary.survey.design(fmt_fun) ──
  Error in `ard_summary(dclus1, variables = c(api99, api00), statistic = ~c("mean", "median", "min", "max"), fmt_fun = list(api00 = list(mean = 2, median = "xx.xx", min = as.character)))`: The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─base::as.data.frame(...)
    2. ├─dplyr::select(...)
    3. ├─cards::ard_summary(...)
    4. └─cardx:::ard_summary.survey.design(...)
    5.   └─cardx:::.restore_original_column_types(...)
    6.     └─cards::as_card(...)
    7.       └─cards::check_ard_structure(...)
    8.         └─cards:::.message_or_error(...)
    9.           └─cli::cli_abort(msg, call = call, .envir = envir)
   10.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:338:3'): ard_summary.survey.design(stat_label) ──
  Error in `ard_summary(dclus1, variables = c(api00, api99), statistic = ~c("mean", "median", "min", "max"), stat_label = list(api00 = list(mean = "MeAn", median = "MEDian", min = "MINimum")))`: The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
      ▆
   1. ├─base::as.data.frame(...)
   2. ├─cards::ard_summary(...)
   3. └─cardx:::ard_summary.survey.design(...)
   4.   └─cardx:::.restore_original_column_types(...)
   5.     └─cards::as_card(...)
   6.       └─cards::check_ard_structure(...)
   7.         └─cards:::.message_or_error(...)
   8.           └─cli::cli_abort(msg, call = call, .envir = envir)
   9.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:363:3'): ard_summary.survey.design(by) unobserved levels/combinations ──
  Error in `ard_summary(dclus1, variables = api00, by = both, statistic = ~c("mean", "median", "min", "max"))`: The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_setequal(...) at test-ard_summary.survey.design.R:363:3
    2. │ └─testthat::quasi_label(enquo(expected))
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─base::unique(...)
    5. ├─cardx:::map_chr(...)
    6. │ └─cardx:::.rlang_purrr_map_mold(.x, .f, character(1), ...)
    7. │   └─base::vapply(.x, .f, .mold, ..., USE.NAMES = FALSE)
    8. ├─dplyr::pull(...)
    9. ├─cards::ard_summary(...)
   10. └─cardx:::ard_summary.survey.design(...)
   11.   └─cardx:::.restore_original_column_types(...)
   12.     └─cards::as_card(...)
   13.       └─cards::check_ard_structure(...)
   14.         └─cards:::.message_or_error(...)
   15.           └─cli::cli_abort(msg, call = call, .envir = envir)
   16.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:403:3'): ard_summary.survey.design() works when using generic names  ──
  Error in `ard_summary(dclus1, variables = c(cds, stype), by = dnum)`: The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-ard_summary.survey.design.R:403:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dplyr::select(...)
    5. ├─cards::ard_summary(dclus1, variables = c(cds, stype), by = dnum)
    6. └─cardx:::ard_summary.survey.design(dclus1, variables = c(cds, stype), by = dnum)
    7.   └─cardx:::.restore_original_column_types(...)
    8.     └─cards::as_card(...)
    9.       └─cards::check_ard_structure(...)
   10.         └─cards:::.message_or_error(...)
   11.           └─cli::cli_abort(msg, call = call, .envir = envir)
   12.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:516:3'): ard_summary.survey.design() follows ard structure ──
  Error in `cards::check_ard_structure(ard_summary(dclus1, variables = c(cds, stype), by = snum), method = FALSE)`: The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_summary.survey.design.R:516: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. ├─cards::check_ard_structure(...)
   10. ├─cards::ard_summary(dclus1, variables = c(cds, stype), by = snum)
   11. └─cardx:::ard_summary.survey.design(...)
   12.   └─cardx:::.restore_original_column_types(...)
   13.     └─cards::as_card(...)
   14.       └─cards::check_ard_structure(...)
   15.         └─cards:::.message_or_error(...)
   16.           └─cli::cli_abort(msg, call = call, .envir = envir)
   17.             └─rlang::abort(...)
  ── Error ('test-ard_summary.survey.design.R:533:3'): ard_summary.survey.design() original types are retained ──
  Error in `ard_summary(data = dclus1, variables = c(api00, api99), by = c(stype, sch.wide_int, sch.wide_dbl))`: The following columns are not present: "stat_label" and "fmt_fun".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_summary.survey.design.R:533: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. ├─cards::ard_summary(...)
   10. └─cardx:::ard_summary.survey.design(...)
   11.   └─cardx:::.restore_original_column_types(...)
   12.     └─cards::as_card(...)
   13.       └─cards::check_ard_structure(...)
   14.         └─cards:::.message_or_error(...)
   15.           └─cli::cli_abort(msg, call = call, .envir = envir)
   16.             └─rlang::abort(...)
  ── Failure ('test-ard_tabulate_max.R:191:3'): ard_tabulate_max() works with pre-ordered factor variables ──
  Expected `res` to equal `dplyr::filter(res3, variable == "AESEV")`.
  Differences:
  `attr(actual, 'args')$variables`:   "AESEV"
  `attr(expected, 'args')$variables`: "SEX"  
  
  ── Error ('test-ard_tabulate_max.R:237:3'): ard_tabulate_max() works without any variables ──
  Error in `ard_tabulate_max(data = cards::ADAE, variables = starts_with("xxxx"), id = USUBJID, by = c(TRTA, AESEV))`: The following columns are not present: "variable", "stat_name", "stat_label", "stat", "fmt_fun", "warning", and "error".
  Backtrace:
      ▆
   1. └─cardx::ard_tabulate_max(...)
   2.   └─cards::as_card(dplyr::tibble())
   3.     └─cards::check_ard_structure(...)
   4.       └─cards:::.message_or_error(...)
   5.         └─cli::cli_abort(msg, call = call, .envir = envir)
   6.           └─rlang::abort(...)
  ── Failure ('test-ard_tabulate.survey.design.R:12:3'): ard_tabulate.survey.design() works ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_tabulate.survey.design.R:12:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_tabulate(...)
    8. └─cardx:::ard_tabulate.survey.design(svy_titanic, variables = c(Class, Age), by = Survived, denominator = "row")
    9.   ├─cards::tidy_ard_row_order(...)
   10.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   11.   ├─cards::tidy_ard_column_order(...)
   12.   │ ├─dplyr::pull(...)
   13.   │ ├─dplyr::arrange(...)
   14.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   15.   │ └─dplyr::select(x, all_ard_groups())
   16.   ├─cards::as_card(...)
   17.   │ └─cards:::check_class(x, cls = "data.frame")
   18.   ├─dplyr::mutate(...)
   19.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   20.     └─cards::as_card(...)
   21.       └─cards::check_ard_structure(...)
   22.         └─cards:::.message_or_error(...)
   23.           └─cli::cli_abort(msg, call = call, .envir = envir)
   24.             └─rlang::abort(...)
  ── Error ('test-ard_tabulate.survey.design.R:22:3'): ard_tabulate.survey.design() works ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_svy_cat_row' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(...) at test-ard_tabulate.survey.design.R:22:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_svy_cat_row, method = FALSE)
  ── Failure ('test-ard_tabulate.survey.design.R:475:3'): ard_tabulate.survey.design() works for unobserved factor levels ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_tabulate.survey.design.R:475:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_tabulate(...)
    8. └─cardx:::ard_tabulate.survey.design(svy_titanic, variables = c(Class, Age), by = Survived, denominator = "row")
    9.   ├─cards::tidy_ard_row_order(...)
   10.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   11.   ├─cards::tidy_ard_column_order(...)
   12.   │ ├─dplyr::pull(...)
   13.   │ ├─dplyr::arrange(...)
   14.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   15.   │ └─dplyr::select(x, all_ard_groups())
   16.   ├─cards::as_card(...)
   17.   │ └─cards:::check_class(x, cls = "data.frame")
   18.   ├─dplyr::mutate(...)
   19.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   20.     └─cards::as_card(...)
   21.       └─cards::check_ard_structure(...)
   22.         └─cards:::.message_or_error(...)
   23.           └─cli::cli_abort(msg, call = call, .envir = envir)
   24.             └─rlang::abort(...)
  ── Error ('test-ard_tabulate.survey.design.R:485:3'): ard_tabulate.survey.design() works for unobserved factor levels ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_svy_cat_row' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(...) at test-ard_tabulate.survey.design.R:485:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_svy_cat_row, method = FALSE)
  ── Failure ('test-ard_tabulate.survey.design.R:771:3'): ard_tabulate.survey.design() works for unobserved logical levels ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_tabulate.survey.design.R:771:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_tabulate(...)
    8. └─cardx:::ard_tabulate.survey.design(svy_titanic, variables = c(Class, Age), by = Survived, denominator = "row")
    9.   ├─cards::tidy_ard_row_order(...)
   10.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   11.   ├─cards::tidy_ard_column_order(...)
   12.   │ ├─dplyr::pull(...)
   13.   │ ├─dplyr::arrange(...)
   14.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   15.   │ └─dplyr::select(x, all_ard_groups())
   16.   ├─cards::as_card(...)
   17.   │ └─cards:::check_class(x, cls = "data.frame")
   18.   ├─dplyr::mutate(...)
   19.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   20.     └─cards::as_card(...)
   21.       └─cards::check_ard_structure(...)
   22.         └─cards:::.message_or_error(...)
   23.           └─cli::cli_abort(msg, call = call, .envir = envir)
   24.             └─rlang::abort(...)
  ── Error ('test-ard_tabulate.survey.design.R:781:3'): ard_tabulate.survey.design() works for unobserved logical levels ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_svy_cat_row' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(...) at test-ard_tabulate.survey.design.R:781:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_svy_cat_row, method = FALSE)
  ── Failure ('test-ard_tabulate.survey.design.R:1062:3'): ard_tabulate.survey.design() works with variables with only 1 level ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_tabulate.survey.design.R:1062:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_tabulate(...)
    8. └─cardx:::ard_tabulate.survey.design(svy_titanic, variables = c(Class, Age), by = Survived, denominator = "row")
    9.   ├─cards::tidy_ard_row_order(...)
   10.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   11.   ├─cards::tidy_ard_column_order(...)
   12.   │ ├─dplyr::pull(...)
   13.   │ ├─dplyr::arrange(...)
   14.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   15.   │ └─dplyr::select(x, all_ard_groups())
   16.   ├─cards::as_card(...)
   17.   │ └─cards:::check_class(x, cls = "data.frame")
   18.   ├─dplyr::mutate(...)
   19.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   20.     └─cards::as_card(...)
   21.       └─cards::check_ard_structure(...)
   22.         └─cards:::.message_or_error(...)
   23.           └─cli::cli_abort(msg, call = call, .envir = envir)
   24.             └─rlang::abort(...)
  ── Error ('test-ard_tabulate.survey.design.R:1072:3'): ard_tabulate.survey.design() works with variables with only 1 level ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_svy_cat_row' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(...) at test-ard_tabulate.survey.design.R:1072:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_svy_cat_row, method = FALSE)
  ── Error ('test-ard_tabulate.survey.design.R:1226:3'): ard_tabulate.survey.design() works when using generic names  ──
  Error in `ard_tabulate(svy_titanic, variables = c(Class, Age), by = Survived, denominator = "row")`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-ard_tabulate.survey.design.R:1226:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dplyr::select(...)
    5. ├─cards::ard_tabulate(...)
    6. └─cardx:::ard_tabulate.survey.design(svy_titanic, variables = c(Class, Age), by = Survived, denominator = "row")
    7.   ├─cards::tidy_ard_row_order(...)
    8.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
    9.   ├─cards::tidy_ard_column_order(...)
   10.   │ ├─dplyr::pull(...)
   11.   │ ├─dplyr::arrange(...)
   12.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   13.   │ └─dplyr::select(x, all_ard_groups())
   14.   ├─cards::as_card(...)
   15.   │ └─cards:::check_class(x, cls = "data.frame")
   16.   ├─dplyr::mutate(...)
   17.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   18.     └─cards::as_card(...)
   19.       └─cards::check_ard_structure(...)
   20.         └─cards:::.message_or_error(...)
   21.           └─cli::cli_abort(msg, call = call, .envir = envir)
   22.             └─rlang::abort(...)
  ── Error ('test-ard_tabulate.survey.design.R:1297:3'): ard_tabulate.survey.design(statistic) properly excluded unweighted stats not selected ──
  Error in `ard_tabulate(svy_titanic, variables = Sex, statistic = ~c("N", "N_unweighted"))`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-ard_tabulate.survey.design.R:1297:3
    2. │ └─testthat::quasi_label(enquo(object), label)
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─dplyr::select(...)
    5. ├─cards::ard_tabulate(...)
    6. └─cardx:::ard_tabulate.survey.design(svy_titanic, variables = Sex, statistic = ~c("N", "N_unweighted"))
    7.   ├─cards::tidy_ard_row_order(...)
    8.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
    9.   ├─cards::tidy_ard_column_order(...)
   10.   │ ├─dplyr::pull(...)
   11.   │ ├─dplyr::arrange(...)
   12.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   13.   │ └─dplyr::select(x, all_ard_groups())
   14.   ├─cards::as_card(...)
   15.   │ └─cards:::check_class(x, cls = "data.frame")
   16.   ├─dplyr::mutate(...)
   17.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   18.     └─cards::as_card(...)
   19.       └─cards::check_ard_structure(...)
   20.         └─cards:::.message_or_error(...)
   21.           └─cli::cli_abort(msg, call = call, .envir = envir)
   22.             └─rlang::abort(...)
  ── Error ('test-ard_tabulate.survey.design.R:1317:3'): ard_tabulate follows ard structure ──
  Error in `cards::check_ard_structure(ard_tabulate(svy_titanic, variables = c(Class, Age), by = Survived, denominator = "row"), method = FALSE)`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_tabulate.survey.design.R:1317: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. ├─cards::check_ard_structure(...)
   10. ├─cards::ard_tabulate(...)
   11. └─cardx:::ard_tabulate.survey.design(...)
   12.   ├─cards::tidy_ard_row_order(...)
   13.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   14.   ├─cards::tidy_ard_column_order(...)
   15.   │ ├─dplyr::pull(...)
   16.   │ ├─dplyr::arrange(...)
   17.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   18.   │ └─dplyr::select(x, all_ard_groups())
   19.   ├─cards::as_card(...)
   20.   │ └─cards:::check_class(x, cls = "data.frame")
   21.   ├─dplyr::mutate(...)
   22.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   23.     └─cards::as_card(...)
   24.       └─cards::check_ard_structure(...)
   25.         └─cards:::.message_or_error(...)
   26.           └─cli::cli_abort(msg, call = call, .envir = envir)
   27.             └─rlang::abort(...)
  ── Error ('test-ard_tabulate.survey.design.R:1340:3'): ard_tabulate.survey.design() original types are retained ──
  Error in `ard_tabulate(svy_titanic, variables = c(Class, Age, Class.int, Class.dbl), by = Survived)`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_tabulate.survey.design.R:1340: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. ├─cards::ard_tabulate(...)
   10. └─cardx:::ard_tabulate.survey.design(...)
   11.   ├─cards::tidy_ard_row_order(...)
   12.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   13.   ├─cards::tidy_ard_column_order(...)
   14.   │ ├─dplyr::pull(...)
   15.   │ ├─dplyr::arrange(...)
   16.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   17.   │ └─dplyr::select(x, all_ard_groups())
   18.   ├─cards::as_card(...)
   19.   │ └─cards:::check_class(x, cls = "data.frame")
   20.   ├─dplyr::mutate(...)
   21.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   22.     └─cards::as_card(...)
   23.       └─cards::check_ard_structure(...)
   24.         └─cards:::.message_or_error(...)
   25.           └─cli::cli_abort(msg, call = call, .envir = envir)
   26.             └─rlang::abort(...)
  ── Error ('test-ard_tabulate.survey.design.R:1375:3'): ard_tabulate.survey.design() works with all NA fct variables ──
  Error in `ard_tabulate(survey::svydesign(~1, data = dplyr::tibble(fct = factor(c(NA, NA), levels = c("no", "yes")), lgl = c(NA, NA)), weights = ~1), variables = fct)`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_tabulate.survey.design.R:1375: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. ├─cards::ard_tabulate(...)
   10. └─cardx:::ard_tabulate.survey.design(...)
   11.   ├─cards::tidy_ard_row_order(...)
   12.   │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   13.   ├─cards::tidy_ard_column_order(...)
   14.   │ ├─dplyr::pull(...)
   15.   │ ├─dplyr::arrange(...)
   16.   │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   17.   │ └─dplyr::select(x, all_ard_groups())
   18.   ├─cards::as_card(...)
   19.   │ └─cards:::check_class(x, cls = "data.frame")
   20.   ├─dplyr::mutate(...)
   21.   └─cardx:::.restore_original_column_types(cards, data = data$variables)
   22.     └─cards::as_card(...)
   23.       └─cards::check_ard_structure(...)
   24.         └─cards:::.message_or_error(...)
   25.           └─cli::cli_abort(msg, call = call, .envir = envir)
   26.             └─rlang::abort(...)
  ── Error ('test-ard_total_n.survey.design.R:4:3'): ard_total_n.survey.design() works ──
  Error in `ard_total_n(survey::svydesign(~1, data = as.data.frame(Titanic), weights = ~Freq))`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─cards::ard_total_n(...)
    2. └─cardx:::ard_total_n.survey.design(survey::svydesign(~1, data = as.data.frame(Titanic), weights = ~Freq))
    3.   ├─dplyr::select(...)
    4.   ├─dplyr::mutate(...)
    5.   ├─cards::ard_tabulate_value(...)
    6.   └─cardx:::ard_tabulate_value.survey.design(...)
    7.     ├─dplyr::mutate(...)
    8.     ├─dplyr::filter(...)
    9.     ├─cards::ard_tabulate(...)
   10.     └─cardx:::ard_tabulate.survey.design(...)
   11.       ├─cards::tidy_ard_row_order(...)
   12.       │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   13.       ├─cards::tidy_ard_column_order(...)
   14.       │ ├─dplyr::pull(...)
   15.       │ ├─dplyr::arrange(...)
   16.       │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   17.       │ └─dplyr::select(x, all_ard_groups())
   18.       ├─cards::as_card(...)
   19.       │ └─cards:::check_class(x, cls = "data.frame")
   20.       ├─dplyr::mutate(...)
   21.       └─cardx:::.restore_original_column_types(cards, data = data$variables)
   22.         └─cards::as_card(...)
   23.           └─cards::check_ard_structure(...)
   24.             └─cards:::.message_or_error(...)
   25.               └─cli::cli_abort(msg, call = call, .envir = envir)
   26.                 └─rlang::abort(...)
  ── Error ('test-ard_total_n.survey.design.R:11:3'): ard_total_n.survey.design() follows ard structure ──
  Error in `cards::check_ard_structure(ard_total_n(survey::svydesign(~1, data = as.data.frame(Titanic), weights = ~Freq)), method = FALSE)`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_total_n.survey.design.R:11: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. ├─cards::check_ard_structure(...)
   10. ├─cards::ard_total_n(...)
   11. └─cardx:::ard_total_n.survey.design(...)
   12.   ├─dplyr::select(...)
   13.   ├─dplyr::mutate(...)
   14.   ├─cards::ard_tabulate_value(...)
   15.   └─cardx:::ard_tabulate_value.survey.design(...)
   16.     ├─dplyr::mutate(...)
   17.     ├─dplyr::filter(...)
   18.     ├─cards::ard_tabulate(...)
   19.     └─cardx:::ard_tabulate.survey.design(...)
   20.       ├─cards::tidy_ard_row_order(...)
   21.       │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   22.       ├─cards::tidy_ard_column_order(...)
   23.       │ ├─dplyr::pull(...)
   24.       │ ├─dplyr::arrange(...)
   25.       │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   26.       │ └─dplyr::select(x, all_ard_groups())
   27.       ├─cards::as_card(...)
   28.       │ └─cards:::check_class(x, cls = "data.frame")
   29.       ├─dplyr::mutate(...)
   30.       └─cardx:::.restore_original_column_types(cards, data = data$variables)
   31.         └─cards::as_card(...)
   32.           └─cards::check_ard_structure(...)
   33.             └─cards:::.message_or_error(...)
   34.               └─cli::cli_abort(msg, call = call, .envir = envir)
   35.                 └─rlang::abort(...)
  ── Error ('test-ard_total_n.survey.design.R:29:3'): ard_total_n.survey.design() using `update()` ──
  Error in `ard_total_n(subset(survey::svydesign(id = ~1, weights = ~poids, data = database), !is.na(INDIV_GENDER)))`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_total_n.survey.design.R:29: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. ├─cards::ard_total_n(...)
   10. └─cardx:::ard_total_n.survey.design(...)
   11.   ├─dplyr::select(...)
   12.   ├─dplyr::mutate(...)
   13.   ├─cards::ard_tabulate_value(...)
   14.   └─cardx:::ard_tabulate_value.survey.design(...)
   15.     ├─dplyr::mutate(...)
   16.     ├─dplyr::filter(...)
   17.     ├─cards::ard_tabulate(...)
   18.     └─cardx:::ard_tabulate.survey.design(...)
   19.       ├─cards::tidy_ard_row_order(...)
   20.       │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   21.       ├─cards::tidy_ard_column_order(...)
   22.       │ ├─dplyr::pull(...)
   23.       │ ├─dplyr::arrange(...)
   24.       │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   25.       │ └─dplyr::select(x, all_ard_groups())
   26.       ├─cards::as_card(...)
   27.       │ └─cards:::check_class(x, cls = "data.frame")
   28.       ├─dplyr::mutate(...)
   29.       └─cardx:::.restore_original_column_types(cards, data = data$variables)
   30.         └─cards::as_card(...)
   31.           └─cards::check_ard_structure(...)
   32.             └─cards:::.message_or_error(...)
   33.               └─cli::cli_abort(msg, call = call, .envir = envir)
   34.                 └─rlang::abort(...)
  ── Failure ('test-ard_tabulate_value.survey.design.R:11:3'): ard_tabulate_value.survey.design() works ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_tabulate_value.survey.design.R:11:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_tabulate_value(...)
    8. └─cardx:::ard_tabulate_value.survey.design(...)
    9.   ├─dplyr::mutate(...)
   10.   ├─dplyr::filter(...)
   11.   ├─cards::ard_tabulate(...)
   12.   └─cardx:::ard_tabulate.survey.design(...)
   13.     ├─cards::tidy_ard_row_order(...)
   14.     │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   15.     ├─cards::tidy_ard_column_order(...)
   16.     │ ├─dplyr::pull(...)
   17.     │ ├─dplyr::arrange(...)
   18.     │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   19.     │ └─dplyr::select(x, all_ard_groups())
   20.     ├─cards::as_card(...)
   21.     │ └─cards:::check_class(x, cls = "data.frame")
   22.     ├─dplyr::mutate(...)
   23.     └─cardx:::.restore_original_column_types(cards, data = data$variables)
   24.       └─cards::as_card(...)
   25.         └─cards::check_ard_structure(...)
   26.           └─cards:::.message_or_error(...)
   27.             └─cli::cli_abort(msg, call = call, .envir = envir)
   28.               └─rlang::abort(...)
  ── Error ('test-ard_tabulate_value.survey.design.R:22:3'): ard_tabulate_value.survey.design() works ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_dichotomous_row' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(...) at test-ard_tabulate_value.survey.design.R:22:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_dichotomous_row, method = FALSE)
  ── Failure ('test-ard_tabulate_value.survey.design.R:630:3'): ard_dichotomous.survey.design() works with various input types ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <rlang_error> with message:
    The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-ard_tabulate_value.survey.design.R:630:3
    2. │ └─testthat:::expect_condition_matching_(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─cards::ard_tabulate_value(...)
    8. └─cardx:::ard_tabulate_value.survey.design(...)
    9.   ├─dplyr::mutate(...)
   10.   ├─dplyr::filter(...)
   11.   ├─cards::ard_tabulate(...)
   12.   └─cardx:::ard_tabulate.survey.design(...)
   13.     ├─cards::tidy_ard_row_order(...)
   14.     │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   15.     ├─cards::tidy_ard_column_order(...)
   16.     │ ├─dplyr::pull(...)
   17.     │ ├─dplyr::arrange(...)
   18.     │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   19.     │ └─dplyr::select(x, all_ard_groups())
   20.     ├─cards::as_card(...)
   21.     │ └─cards:::check_class(x, cls = "data.frame")
   22.     ├─dplyr::mutate(...)
   23.     └─cardx:::.restore_original_column_types(cards, data = data$variables)
   24.       └─cards::as_card(...)
   25.         └─cards::check_ard_structure(...)
   26.           └─cards:::.message_or_error(...)
   27.             └─cli::cli_abort(msg, call = call, .envir = envir)
   28.               └─rlang::abort(...)
  ── Error ('test-ard_tabulate_value.survey.design.R:641:3'): ard_dichotomous.survey.design() works with various input types ──
  <objectNotFoundError/error/condition>
  Error in `eval(code, test_env)`: object 'ard_dichotomous_row' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_invisible(...) at test-ard_tabulate_value.survey.design.R:641:3
   2. │ └─base::withVisible(call)
   3. └─cards::check_ard_structure(ard_dichotomous_row, method = FALSE)
  ── Error ('test-ard_tabulate_value.survey.design.R:790:3'): ard_tabulate_value.survey.design() follows ard structure ──
  Error in `cards::check_ard_structure(ard_tabulate_value(svy_dicho, by = vs, variables = c(cyl, am), value = list(cyl = 4), denominator = "row"), method = FALSE)`: The following columns are not present: "warning" and "error".
  Backtrace:
       ▆
    1. ├─testthat::expect_silent(...) at test-ard_tabulate_value.survey.design.R:790: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. ├─cards::check_ard_structure(...)
   10. ├─cards::ard_tabulate_value(...)
   11. └─cardx:::ard_tabulate_value.survey.design(...)
   12.   ├─dplyr::mutate(...)
   13.   ├─dplyr::filter(...)
   14.   ├─cards::ard_tabulate(...)
   15.   └─cardx:::ard_tabulate.survey.design(...)
   16.     ├─cards::tidy_ard_row_order(...)
   17.     │ └─dplyr::select(x, all_ard_groups(c("names", "levels")))
   18.     ├─cards::tidy_ard_column_order(...)
   19.     │ ├─dplyr::pull(...)
   20.     │ ├─dplyr::arrange(...)
   21.     │ ├─base::data.frame(colname = names(dplyr::select(x, all_ard_groups())))
   22.     │ └─dplyr::select(x, all_ard_groups())
   23.     ├─cards::as_card(...)
   24.     │ └─cards:::check_class(x, cls = "data.frame")
   25.     ├─dplyr::mutate(...)
   26.     └─cardx:::.restore_original_column_types(cards, data = data$variables)
   27.       └─cards::as_card(...)
   28.         └─cards::check_ard_structure(...)
   29.           └─cards:::.message_or_error(...)
   30.             └─cli::cli_abort(msg, call = call, .envir = envir)
   31.               └─rlang::abort(...)
  
  [ FAIL 49 | WARN 0 | SKIP 59 | PASS 327 ]
  Error:
  ! Test failures.
  Execution halted