Running ‘spelling.R’
  Running ‘testthat.R’ [32s/63s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(covidregionaldata)
  > source("testthat/custom_tests/mock_data.R")
  > 
  > test_check("covidregionaldata")
  [ FAIL 12 | WARN 0 | SKIP 0 | PASS 203 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-CountryDataClass.R:14:3): CountryDataClass specific filter method works correctly ──
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'un_region' not found
  i The error occurred in group 1: level_1_region = "Zimbabwe", un_region = "Africa".
  Backtrace:
       ▆
    1. ├─base::suppressMessages(c$get()) at test-CountryDataClass.R:14:2
    2. │ └─base::withCallingHandlers(...)
    3. ├─c$get()
    4. │ └─self$process()
    5. │   └─covidregionaldata:::process_internal(...)
    6. │     └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
    7. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
    8. ├─dplyr::select(...)
    9. ├─covidregionaldata:::complete_cumulative_columns(.)
   10. │ ├─cumulative_col_names %in% colnames(data)
   11. │ └─base::colnames(data)
   12. │   └─base::is.data.frame(x)
   13. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   14. │ └─data %>% ...
   15. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   16. ├─tidyr:::complete.grouped_df(...)
   17. │ ├─dplyr::summarise(...)
   18. │ └─dplyr:::summarise.grouped_df(...)
   19. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   20. │     ├─base::withCallingHandlers(...)
   21. │     └─mask$eval_all_summarise(quo)
   22. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   23. ├─tidyr:::complete.data.frame(...)
   24. │ ├─tidyr::expand(data, ...)
   25. │ └─tidyr:::expand.data.frame(data, ...)
   26. │   └─tidyr:::grid_dots(..., `_data` = data)
   27. │     └─rlang::eval_tidy(dot, data = mask)
   28. ├─tidyr::nesting(un_region, level_1_region, level_1_region_code)
   29. │ └─tidyr:::grid_dots(...)
   30. │   └─rlang::eval_tidy(dot, data = mask)
   31. └─base::.handleSimpleError(...)
   32.   └─dplyr h(simpleError(msg, call))
   33.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Failure (test-DataClass.R:66:3): DataClass can process data ─────────────────
  `suppressMessages(d$process())` threw an unexpected error.
  Message: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'un_region' not found
  i The error occurred in group 1: level_1_region = "Zimbabwe", un_region = "Africa".
  Class:   dplyr_error/rlang_error/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(suppressMessages(d$process()), NA) at test-DataClass.R:66:2
    2. │ └─testthat:::expect_condition_matching(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─base::suppressMessages(d$process())
    8. │ └─base::withCallingHandlers(...)
    9. ├─d$process()
   10. │ └─covidregionaldata:::process_internal(...)
   11. │   └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
   12. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
   13. ├─dplyr::select(...)
   14. ├─covidregionaldata:::complete_cumulative_columns(.)
   15. │ ├─cumulative_col_names %in% colnames(data)
   16. │ └─base::colnames(data)
   17. │   └─base::is.data.frame(x)
   18. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   19. │ └─data %>% ...
   20. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   21. ├─tidyr:::complete.grouped_df(...)
   22. │ ├─dplyr::summarise(...)
   23. │ └─dplyr:::summarise.grouped_df(...)
   24. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   25. │     ├─base::withCallingHandlers(...)
   26. │     └─mask$eval_all_summarise(quo)
   27. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   28. ├─tidyr:::complete.data.frame(...)
   29. │ ├─tidyr::expand(data, ...)
   30. │ └─tidyr:::expand.data.frame(data, ...)
   31. │   └─tidyr:::grid_dots(..., `_data` = data)
   32. │     └─rlang::eval_tidy(dot, data = mask)
   33. ├─tidyr::nesting(un_region, level_1_region, level_1_region_code)
   34. │ └─tidyr:::grid_dots(...)
   35. │   └─rlang::eval_tidy(dot, data = mask)
   36. └─base::.handleSimpleError(...)
   37.   └─dplyr h(simpleError(msg, call))
   38.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Failure (test-DataClass.R:67:3): DataClass can process data ─────────────────
  d$data$processed is not an S3 object
  ── Failure (test-DataClass.R:68:3): DataClass can process data ─────────────────
  nrow(d$data$processed) != 0 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Error (test-DataClass.R:70:1): (code run outside of `test_that()`) ──────────
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  ℹ `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  ✖ object 'un_region' not found
  ℹ The error occurred in group 1: level_1_region = "Zimbabwe", un_region = "Africa".
  Backtrace:
       ▆
    1. ├─base::suppressMessages(d$process()) at test-DataClass.R:70:0
    2. │ └─base::withCallingHandlers(...)
    3. ├─d$process()
    4. │ └─covidregionaldata:::process_internal(...)
    5. │   └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
    6. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
    7. ├─dplyr::select(...)
    8. ├─covidregionaldata:::complete_cumulative_columns(.)
    9. │ ├─cumulative_col_names %in% colnames(data)
   10. │ └─base::colnames(data)
   11. │   └─base::is.data.frame(x)
   12. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   13. │ └─data %>% ...
   14. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   15. ├─tidyr:::complete.grouped_df(...)
   16. │ ├─dplyr::summarise(...)
   17. │ └─dplyr:::summarise.grouped_df(...)
   18. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   19. │     ├─base::withCallingHandlers(...)
   20. │     └─mask$eval_all_summarise(quo)
   21. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   22. ├─tidyr:::complete.data.frame(...)
   23. │ ├─tidyr::expand(data, ...)
   24. │ └─tidyr:::expand.data.frame(data, ...)
   25. │   └─tidyr:::grid_dots(..., `_data` = data)
   26. │     └─rlang::eval_tidy(dot, data = mask)
   27. ├─tidyr::nesting(un_region, level_1_region, level_1_region_code)
   28. │ └─tidyr:::grid_dots(...)
   29. │   └─rlang::eval_tidy(dot, data = mask)
   30. └─base::.handleSimpleError(...)
   31.   └─dplyr h(simpleError(msg, call))
   32.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Error (test-get_national_data.R:13:5): get_national_data returns ecdc data ──
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'level_1_region' not found
  i The error occurred in group 1: level_1_region = "Zimbabwe", level_1_region_code = "ZW".
  Backtrace:
       ▆
    1. ├─covidregionaldata::get_national_data(...) at test-get_national_data.R:13:4
    2. │ └─initialise_dataclass(...)
    3. │   └─class$get()
    4. │     └─self$process() at covidregionaldata/R/shared-methods.R:344:6
    5. │       └─covidregionaldata:::process_internal(...) at covidregionaldata/R/shared-methods.R:323:6
    6. │         └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
    7. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
    8. ├─dplyr::select(...)
    9. ├─covidregionaldata:::complete_cumulative_columns(.)
   10. │ ├─cumulative_col_names %in% colnames(data)
   11. │ └─base::colnames(data)
   12. │   └─base::is.data.frame(x)
   13. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   14. │ └─data %>% ...
   15. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   16. ├─tidyr:::complete.grouped_df(...)
   17. │ ├─dplyr::summarise(...)
   18. │ └─dplyr:::summarise.grouped_df(...)
   19. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   20. │     ├─base::withCallingHandlers(...)
   21. │     └─mask$eval_all_summarise(quo)
   22. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   23. ├─tidyr:::complete.data.frame(...)
   24. │ ├─tidyr::expand(data, ...)
   25. │ └─tidyr:::expand.data.frame(data, ...)
   26. │   └─tidyr:::grid_dots(..., `_data` = data)
   27. │     └─rlang::eval_tidy(dot, data = mask)
   28. ├─tidyr::nesting(level_1_region, level_1_region_code)
   29. │ └─tidyr:::grid_dots(...)
   30. │   └─rlang::eval_tidy(dot, data = mask)
   31. └─base::.handleSimpleError(...)
   32.   └─dplyr h(simpleError(msg, call))
   33.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Error (test-get_national_data.R:13:5): get_national_data returns who data ───
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'level_1_region_code' not found
  i The error occurred in group 1: level_1_region = "Zimbabwe", level_1_region_code = "ZW".
  Backtrace:
       ▆
    1. ├─covidregionaldata::get_national_data(...) at test-get_national_data.R:13:4
    2. │ └─initialise_dataclass(...)
    3. │   └─class$get()
    4. │     └─self$process() at covidregionaldata/R/shared-methods.R:344:6
    5. │       └─covidregionaldata:::process_internal(...) at covidregionaldata/R/shared-methods.R:323:6
    6. │         └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
    7. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
    8. ├─dplyr::select(...)
    9. ├─covidregionaldata:::complete_cumulative_columns(.)
   10. │ ├─cumulative_col_names %in% colnames(data)
   11. │ └─base::colnames(data)
   12. │   └─base::is.data.frame(x)
   13. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   14. │ └─data %>% ...
   15. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   16. ├─tidyr:::complete.grouped_df(...)
   17. │ ├─dplyr::summarise(...)
   18. │ └─dplyr:::summarise.grouped_df(...)
   19. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   20. │     ├─base::withCallingHandlers(...)
   21. │     └─mask$eval_all_summarise(quo)
   22. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   23. ├─tidyr:::complete.data.frame(...)
   24. │ ├─tidyr::expand(data, ...)
   25. │ └─tidyr:::expand.data.frame(data, ...)
   26. │   └─tidyr:::grid_dots(..., `_data` = data)
   27. │     └─rlang::eval_tidy(dot, data = mask)
   28. ├─tidyr::nesting(level_1_region_code, level_1_region)
   29. │ └─tidyr:::grid_dots(...)
   30. │   └─rlang::eval_tidy(dot, data = mask)
   31. └─base::.handleSimpleError(...)
   32.   └─dplyr h(simpleError(msg, call))
   33.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Error (test-get_regional_data.R:15:5): get_regional_data returns level 1 data ──
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'level_1_region' not found
  i The error occurred in group 1: level_1_region = "Nayarit", level_1_region_code = "MX-NAY".
  Backtrace:
       ▆
    1. ├─covidregionaldata::get_regional_data(...) at test-get_regional_data.R:15:4
    2. │ └─initialise_dataclass(...)
    3. │   └─class$get()
    4. │     └─self$process() at covidregionaldata/R/shared-methods.R:344:6
    5. │       └─covidregionaldata:::process_internal(...) at covidregionaldata/R/shared-methods.R:323:6
    6. │         └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
    7. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
    8. ├─dplyr::select(...)
    9. ├─covidregionaldata:::complete_cumulative_columns(.)
   10. │ ├─cumulative_col_names %in% colnames(data)
   11. │ └─base::colnames(data)
   12. │   └─base::is.data.frame(x)
   13. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   14. │ └─data %>% ...
   15. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   16. ├─tidyr:::complete.grouped_df(...)
   17. │ ├─dplyr::summarise(...)
   18. │ └─dplyr:::summarise.grouped_df(...)
   19. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   20. │     ├─base::withCallingHandlers(...)
   21. │     └─mask$eval_all_summarise(quo)
   22. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   23. ├─tidyr:::complete.data.frame(...)
   24. │ ├─tidyr::expand(data, ...)
   25. │ └─tidyr:::expand.data.frame(data, ...)
   26. │   └─tidyr:::grid_dots(..., `_data` = data)
   27. │     └─rlang::eval_tidy(dot, data = mask)
   28. ├─tidyr::nesting(level_1_region, level_1_region_code)
   29. │ └─tidyr:::grid_dots(...)
   30. │   └─rlang::eval_tidy(dot, data = mask)
   31. └─base::.handleSimpleError(...)
   32.   └─dplyr h(simpleError(msg, call))
   33.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Error (test-get_regional_data.R:15:5): get_regional_data returns level 2 data ──
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'level_1_region_code' not found
  i The error occurred in group 1: level_1_region = "Zacatecas", level_1_region_code = "MX-ZAC", level_2_region = "Chalchihuites", level_2_region_code = "32009".
  Backtrace:
       ▆
    1. ├─covidregionaldata::get_regional_data(...) at test-get_regional_data.R:15:4
    2. │ └─initialise_dataclass(...)
    3. │   └─class$get()
    4. │     └─self$process() at covidregionaldata/R/shared-methods.R:344:6
    5. │       └─covidregionaldata:::process_internal(...) at covidregionaldata/R/shared-methods.R:323:6
    6. │         └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
    7. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
    8. ├─dplyr::select(...)
    9. ├─covidregionaldata:::complete_cumulative_columns(.)
   10. │ ├─cumulative_col_names %in% colnames(data)
   11. │ └─base::colnames(data)
   12. │   └─base::is.data.frame(x)
   13. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   14. │ └─data %>% ...
   15. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   16. ├─tidyr:::complete.grouped_df(...)
   17. │ ├─dplyr::summarise(...)
   18. │ └─dplyr:::summarise.grouped_df(...)
   19. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   20. │     ├─base::withCallingHandlers(...)
   21. │     └─mask$eval_all_summarise(quo)
   22. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   23. ├─tidyr:::complete.data.frame(...)
   24. │ ├─tidyr::expand(data, ...)
   25. │ └─tidyr:::expand.data.frame(data, ...)
   26. │   └─tidyr:::grid_dots(..., `_data` = data)
   27. │     └─rlang::eval_tidy(dot, data = mask)
   28. ├─tidyr::nesting(...)
   29. │ └─tidyr:::grid_dots(...)
   30. │   └─rlang::eval_tidy(dot, data = mask)
   31. └─base::.handleSimpleError(...)
   32.   └─dplyr h(simpleError(msg, call))
   33.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Error (test-processing.R:99:3): complete_cumulative_columns works ───────────
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'level_1_region' not found
  i The error occurred in group 1: level_1_region = "Eastland".
  Backtrace:
       ▆
    1. ├─global get_input_data_for_complete_cumulative_columns_test() at test-processing.R:99:2
    2. │ └─covidregionaldata:::fill_empty_dates_with_na(partial_data_with_cum_cases_na)
    3. │   └─data %>% ...
    4. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
    5. ├─tidyr:::complete.grouped_df(...)
    6. │ ├─dplyr::summarise(...)
    7. │ └─dplyr:::summarise.grouped_df(...)
    8. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
    9. │     ├─base::withCallingHandlers(...)
   10. │     └─mask$eval_all_summarise(quo)
   11. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   12. ├─tidyr:::complete.data.frame(...)
   13. │ ├─tidyr::expand(data, ...)
   14. │ └─tidyr:::expand.data.frame(data, ...)
   15. │   └─tidyr:::grid_dots(..., `_data` = data)
   16. │     └─rlang::eval_tidy(dot, data = mask)
   17. ├─tidyr::nesting(level_1_region, level_1_region_code)
   18. │ └─tidyr:::grid_dots(...)
   19. │   └─rlang::eval_tidy(dot, data = mask)
   20. └─base::.handleSimpleError(...)
   21.   └─dplyr h(simpleError(msg, call))
   22.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Error (test-processing.R:110:5): process_regional.crd_level_1 works ─────────
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'level_1_region' not found
  i The error occurred in group 1: level_1_region = "Nayarit", level_1_region_code = "MX-NAY".
  Backtrace:
       ▆
    1. ├─mexico$process() at test-processing.R:110:4
    2. │ └─covidregionaldata:::process_internal(...) at covidregionaldata/R/shared-methods.R:323:6
    3. │   └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
    4. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
    5. ├─dplyr::select(...)
    6. ├─covidregionaldata:::complete_cumulative_columns(.)
    7. │ ├─cumulative_col_names %in% colnames(data)
    8. │ └─base::colnames(data)
    9. │   └─base::is.data.frame(x)
   10. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   11. │ └─data %>% ...
   12. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   13. ├─tidyr:::complete.grouped_df(...)
   14. │ ├─dplyr::summarise(...)
   15. │ └─dplyr:::summarise.grouped_df(...)
   16. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   17. │     ├─base::withCallingHandlers(...)
   18. │     └─mask$eval_all_summarise(quo)
   19. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   20. ├─tidyr:::complete.data.frame(...)
   21. │ ├─tidyr::expand(data, ...)
   22. │ └─tidyr:::expand.data.frame(data, ...)
   23. │   └─tidyr:::grid_dots(..., `_data` = data)
   24. │     └─rlang::eval_tidy(dot, data = mask)
   25. ├─tidyr::nesting(level_1_region, level_1_region_code)
   26. │ └─tidyr:::grid_dots(...)
   27. │   └─rlang::eval_tidy(dot, data = mask)
   28. └─base::.handleSimpleError(...)
   29.   └─dplyr h(simpleError(msg, call))
   30.     └─rlang::abort(bullets, class = "dplyr_error")
  ── Error (test-processing.R:110:5): process_regional.crd_level_2 works ─────────
  <dplyr_error/rlang_error/error/condition>
  Error in `h(simpleError(msg, call))`: Problem with `summarise()` input `..1`.
  i `..1 = complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)`.
  x object 'level_1_region_code' not found
  i The error occurred in group 1: level_1_region = "Zacatecas", level_1_region_code = "MX-ZAC", level_2_region = "Chalchihuites", level_2_region_code = "32009".
  Backtrace:
       ▆
    1. ├─mexico$process() at test-processing.R:110:4
    2. │ └─covidregionaldata:::process_internal(...) at covidregionaldata/R/shared-methods.R:323:6
    3. │   └─... %>% arrange(.data$date, all_of(group_vars_standard[1]))
    4. ├─dplyr::arrange(., .data$date, all_of(group_vars_standard[1]))
    5. ├─dplyr::select(...)
    6. ├─covidregionaldata:::complete_cumulative_columns(.)
    7. │ ├─cumulative_col_names %in% colnames(data)
    8. │ └─base::colnames(data)
    9. │   └─base::is.data.frame(x)
   10. ├─covidregionaldata:::fill_empty_dates_with_na(.)
   11. │ └─data %>% ...
   12. ├─tidyr::complete(., date = full_seq(data$date, period = 1), nesting(!!!syms(regions)))
   13. ├─tidyr:::complete.grouped_df(...)
   14. │ ├─dplyr::summarise(...)
   15. │ └─dplyr:::summarise.grouped_df(...)
   16. │   └─dplyr:::summarise_cols(.data, ..., caller_env = caller_env())
   17. │     ├─base::withCallingHandlers(...)
   18. │     └─mask$eval_all_summarise(quo)
   19. ├─tidyr::complete(data = dplyr::cur_data(), ..., fill = fill, explicit = explicit)
   20. ├─tidyr:::complete.data.frame(...)
   21. │ ├─tidyr::expand(data, ...)
   22. │ └─tidyr:::expand.data.frame(data, ...)
   23. │   └─tidyr:::grid_dots(..., `_data` = data)
   24. │     └─rlang::eval_tidy(dot, data = mask)
   25. ├─tidyr::nesting(...)
   26. │ └─tidyr:::grid_dots(...)
   27. │   └─rlang::eval_tidy(dot, data = mask)
   28. └─base::.handleSimpleError(...)
   29.   └─dplyr h(simpleError(msg, call))
   30.     └─rlang::abort(bullets, class = "dplyr_error")
  
  [ FAIL 12 | WARN 0 | SKIP 0 | PASS 203 ]
  Error: Test failures
  Execution halted