Running ‘spelling.R’ [0s/0s]
  Running ‘testthat.R’ [345s/221s]
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/tests.html
  > # * https://testthat.r-lib.org/reference/test_package.html#special-files
  > 
  > library(testthat)
  > library(CohortCharacteristics)
  > 
  > test_check("CohortCharacteristics")
  Starting 2 test processes.
  > test-plotCohortTiming.R: i The following estimates will be computed:
  > test-plotCohortTiming.R: * days_between_cohort_entries: min, q25, median, q75, max, density
  > test-plotCohortTiming.R: ! Table is collected to memory as not all requested estimates are supported on the database side
  > test-plotCohortTiming.R: > Start summary of data, at 2025-12-06 12:28:53.267028
  > test-plotCohortTiming.R: v Summary finished, at 2025-12-06 12:28:53.496848
  > test-plotCohortTiming.R: `result_id` is not present in result.
  Saving _problems/test-plotCohortTiming-237.R
  Saving _problems/test-plotCohortAttrition-14.R
  > test-plotLargeScaleCharacteristics.R: i Summarising large scale characteristics 
  > test-plotLargeScaleCharacteristics.R:  - getting characteristics from table condition_occurrence (1 of 1)
  > test-plotLargeScaleCharacteristics.R:  - getting characteristics from table condition_occurrence (1 of 1) for time ...
  > test-plotLargeScaleCharacteristics.R:  - getting characteristics from table condition_occurrence (1 of 1) for time ...
  > test-plotLargeScaleCharacteristics.R:  - getting characteristics from table condition_occurrence (1 of 1) for time ...
  > test-plotLargeScaleCharacteristics.R:  - getting characteristics from table condition_occurrence (1 of 1) for time ...
  > test-plotLargeScaleCharacteristics.R:  - getting characteristics from table condition_occurrence (1 of 1) for time ...
  > test-plotLargeScaleCharacteristics.R:  - getting characteristics from table condition_occurrence (1 of 1) for time ...
  > test-plotLargeScaleCharacteristics.R:  - getting characteristics from table condition_occurrence (1 of 1) for time ...
  > test-plotLargeScaleCharacteristics.R: Formatting result
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-plotLargeScaleCharacteristics.R: v Summarising large scale characteristics
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/2
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to 0` -> `365_to_0`
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 2/2
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to 0` -> `inf_to_0`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/3
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 2/3
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 3/3
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to 0` -> `inf_to_0`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  Saving _problems/test-summariseCohortCodelist-9.R
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to 0` -> `365_to_0`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to 0` -> `365_to_0`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/1
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/1
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/1
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/2
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to 0` -> `365_to_0`
  > test-summariseCohortOverlap.R: `result_id` is not present in result.
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 2/2
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to 0` -> `inf_to_0`
  > test-summariseCohortOverlap.R: `result_id` is not present in result.
  > test-summariseCohortOverlap.R: `result_id` is not present in result.
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCohortOverlap.R: `result_id` is not present in result.
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCohortOverlap.R: `result_id` is not present in result.
  > test-summariseCharacteristics.R: i summarising cohort cohort_2
  > test-summariseCharacteristics.R: i summarising cohort cohort_3
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding tableIntersectFlag 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to 0` -> `365_to_0`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCohortTiming.R: i The following estimates will be computed:
  > test-summariseCohortTiming.R: * days_between_cohort_entries: min, q25, median, q75, max, density
  > test-summariseCohortTiming.R: ! Table is collected to memory as not all requested estimates are supported on the database side
  > test-summariseCohortTiming.R: > Start summary of data, at 2025-12-06 12:30:25.466697
  > test-summariseCohortTiming.R: v Summary finished, at 2025-12-06 12:30:25.835655
  > test-summariseCharacteristics.R: i summarising cohort cohort_2
  > test-summariseCohortTiming.R: i The following estimates will be computed:
  > test-summariseCohortTiming.R: * days_between_cohort_entries: min, max
  > test-summariseCohortTiming.R: > Start summary of data, at 2025-12-06 12:30:26.791567
  > test-summariseCohortTiming.R: v Summary finished, at 2025-12-06 12:30:26.952665
  > test-summariseCharacteristics.R: i summarising cohort cohort_3
  > test-summariseCohortTiming.R: i The following estimates will be computed:
  > test-summariseCohortTiming.R: * days_between_cohort_entries: density
  > test-summariseCohortTiming.R: ! Table is collected to memory as not all requested estimates are supported on the database side
  > test-summariseCohortTiming.R: > Start summary of data, at 2025-12-06 12:30:27.92438
  > test-summariseCohortTiming.R: v Summary finished, at 2025-12-06 12:30:28.351087
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCohortTiming.R: i The following estimates will be computed:
  > test-summariseCohortTiming.R: * days_between_cohort_entries: min, q25, median, q75, max, density
  > test-summariseCohortTiming.R: ! Table is collected to memory as not all requested estimates are supported on the database side
  > test-summariseCohortTiming.R: > Start summary of data, at 2025-12-06 12:30:31.358878
  > test-summariseCohortTiming.R: v Summary finished, at 2025-12-06 12:30:32.743473
  > test-summariseCohortTiming.R: i The following estimates will be computed:
  > test-summariseCohortTiming.R: * days_between_cohort_entries: density
  > test-summariseCohortTiming.R: ! Table is collected to memory as not all requested estimates are supported on the database side
  > test-summariseCohortTiming.R: > Start summary of data, at 2025-12-06 12:30:34.419245
  > test-summariseCohortTiming.R: v Summary finished, at 2025-12-06 12:30:35.449546
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/2
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to 0` -> `365_to_0`
  > test-summariseCohortTiming.R: i The following estimates will be computed:
  > test-summariseCohortTiming.R: * days_between_cohort_entries: min, q25, median, q75, max
  > test-summariseCohortTiming.R: ! Table is collected to memory as not all requested estimates are supported on the database side
  > test-summariseCohortTiming.R: > Start summary of data, at 2025-12-06 12:30:43.537426
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 2/2
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to 0` -> `inf_to_0`
  > test-summariseCohortTiming.R: v Summary finished, at 2025-12-06 12:30:44.426939
  > test-summariseCharacteristics.R: i summarising data
  > test-utilities.R: `group` is not present in settings.
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-utilities.R: `group` is not present in settings.
  > test-utilities.R: `group` is not present in settings.
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/2
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to 0` -> `365_to_0`
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 2/2
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to 0` -> `inf_to_0`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding tableIntersectCount 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to -1` -> `inf_to_1`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding tableIntersectFlag 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to -1` -> `inf_to_1`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding tableIntersectDate 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to -1` -> `inf_to_1`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding tableIntersectDays 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `1 to Inf` -> `1_to_inf`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort exposed
  > test-summariseCharacteristics.R: i summarising cohort unexposed
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectCount 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to -1` -> `inf_to_1`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to -1` -> `inf_to_1`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectDate 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-Inf to -1` -> `inf_to_1`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectDays 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `1 to Inf` -> `1_to_inf`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to -1` -> `365_to_1`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  > test-summariseCharacteristics.R: i summarising cohort cohort_2
  > test-summariseCharacteristics.R: v summariseCharacteristics finished!
  > test-summariseCharacteristics.R: i adding demographics columns
  > test-summariseCharacteristics.R: i adding cohortIntersectFlag 1/1
  > test-summariseCharacteristics.R: window names casted to snake_case:
  > test-summariseCharacteristics.R: * `-365 to -1` -> `365_to_1`
  > test-summariseCharacteristics.R: i summarising data
  > test-summariseCharacteristics.R: i summarising cohort cohort_1
  Saving _problems/test-summariseCharacteristics-1662.R
  Saving _problems/test-summariseCharacteristics-1668.R
  [ FAIL 5 | WARN 8 | SKIP 24 | PASS 196 ]
  
  ══ Skipped tests (24) ══════════════════════════════════════════════════════════
  • On CRAN (22): 'test-benchmarkCohortCharacteristics.R:2:3',
    'test-plotCharacteristics.R:2:3', 'test-plotCharacteristics.R:176:3',
    'test-plotCohortCount.R:2:3', 'test-plotCohortOverlap.R:2:3',
    'test-plotCohortTiming.R:2:3', 'test-plotCohortTiming.R:100:3',
    'test-plotLargeScaleCharacteristics.R:3:3',
    'test-summariseCohortCount.R:2:3',
    'test-summariseLargeScaleCharacteristics.R:2:3', 'test-table.R:2:3',
    'test-tableCharacteristics.R:2:3', 'test-tableCharacteristics.R:124:3',
    'test-tableCohortAttrition.R:2:3', 'test-tableCohortCount.R:2:3',
    'test-tableCohortOverlap.R:2:3', 'test-tableCohortTiming.R:2:3',
    'test-tableLargeScaleCharacteristics.R:2:3',
    'test-tableLargeScaleCharacteristics.R:80:3',
    'test-summariseCharacteristics.R:1180:3',
    'test-summariseCharacteristics.R:1425:3',
    'test-summariseCharacteristics.R:1552:3'
  • empty test (2): 'test-plotLargeScaleCharacteristics.R:140:1',
    'test-summariseCohortTiming.R:107:1'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-plotCohortTiming.R:237:3'): plotCohortTiming, density x axis ───
  <rlib_error_package_not_found/rlang_error/error/condition>
  Error in `plotInternal(result = result, resultType = "summarise_cohort_timing", plotType = plotType, facet = facet, colour = colour, uniqueCombinations = uniqueCombinations, oneVariable = TRUE, toYears = timeScale == "years", excludeGroup = "variable_level", style = style)`: The package "visOmopResults" is required.
  Backtrace:
      ▆
   1. ├─testthat::expect_warning(p <- plotCohortTiming(timing, plotType = "densityplot")) at test-plotCohortTiming.R:237: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. └─CohortCharacteristics::plotCohortTiming(timing, plotType = "densityplot")
   8.   └─CohortCharacteristics:::plotInternal(...)
   9.     └─rlang::check_installed("visOmopResults")
  ── Error ('test-plotCohortAttrition.R:14:3'): plot cohort attrition ────────────
  <rlib_error_package_not_found/rlang_error/error/condition>
  Error in `plotCohortAttrition(ca, cohortId = 2)`: The package "DiagrammeR" is required.
  Backtrace:
      ▆
   1. ├─testthat::expect_warning(x <- plotCohortAttrition(ca, cohortId = 2)) at test-plotCohortAttrition.R:14: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. └─CohortCharacteristics::plotCohortAttrition(ca, cohortId = 2)
   8.   └─rlang::check_installed("DiagrammeR")
  ── Error ('test-summariseCohortCodelist.R:9:3'): test summarise cohortCodelist attribute ──
  <rlib_error_package_not_found/rlang_error/error/condition>
  Error in `tableCohortCodelist(res)`: The package "reactable" is required.
  Backtrace:
      ▆
   1. ├─testthat::expect_warning(tableCohortCodelist(res)) at test-summariseCohortCodelist.R:9: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. └─CohortCharacteristics::tableCohortCodelist(res)
   8.   └─rlang::check_installed("reactable")
  ── Failure ('test-summariseCharacteristics.R:1653:3'): weights in summariseCharacteristics ──
  Expected `... <- NULL` not to throw any errors.
  Actually got a <purrr_error_indexed> with message:
    i In index: 1.
    Caused by error in `PatientProfiles::summariseResult()`:
    ! The package "Hmisc" is required.
  ── Error ('test-summariseCharacteristics.R:1665:3'): weights in summariseCharacteristics ──
  Error in `eval(code, test_env)`: object 'resultW' not found
  Backtrace:
      ▆
   1. └─testthat::expect_identical(...) at test-summariseCharacteristics.R:1665:3
   2.   └─testthat::quasi_label(enquo(expected), expected.label)
   3.     └─rlang::eval_bare(expr, quo_get_env(quo))
  
  [ FAIL 5 | WARN 8 | SKIP 24 | PASS 196 ]
  Error:
  ! Test failures.
  Execution halted