Running ‘testthat.R’ [8s/10s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(xpectr)
  > 
  > test_check("xpectr")
  [ FAIL 8 | WARN 0 | SKIP 2 | PASS 620 ]
  
  ══ Skipped tests (2) ═══════════════════════════════════════════════════════════
  • skipping due to breaking changes in R 4.0.0 (2):
    'test_gxs_selection.R:1382:5', 'test_gxs_selection.R:1810:5'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_create_expectations.R:76:3'): expectation are created properly with create_expectations_vector() ──
  Error in `unlist(x, recursive, use.names)`: NA in coercion to boolean
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(create_expectations_vector(vec_1), exp_vec_1) at test_create_expectations.R:76:3
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─xpectr:::create_expectations_vector(vec_1)
   5.   └─xpectr::element_lengths(data, length)
   6.     └─base::unlist(lapply(x, length), use.names = keep_names)
  ── Error ('test_gxs_function.R:388:3'): gxs_function() works ───────────────────
  Error in `unlist(x, recursive, use.names)`: NA in coercion to boolean
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test_gxs_function.R:388:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─xpectr::strip(...)
    5. │ └─checkmate::assert_character(...)
    6. │   └─checkmate::checkCharacter(...)
    7. │     └─... %and% ...
    8. │       └─base::isTRUE(lhs)
    9. ├─xpectr::gxs_function(...)
   10. │ ├─... %>% unlist(recursive = TRUE)
   11. │ └─plyr::llply(...)
   12. │   ├─base::structure(lapply(pieces, .fun, ...), dim = dim(pieces))
   13. │   └─base::lapply(pieces, .fun, ...)
   14. │     └─xpectr (local) FUN(X[[i]], ...)
   15. │       └─xpectr::gxs_selection(...)
   16. │         └─xpectr:::create_expectations_vector(...)
   17. │           └─xpectr::element_lengths(data, length)
   18. │             └─base::unlist(lapply(x, length), use.names = keep_names)
   19. └─base::unlist(., recursive = TRUE)
  ── Error ('test_gxs_function.R:893:3'): gxs_function() works with extra combinations ──
  Error in `unlist(x, recursive, use.names)`: NA in coercion to boolean
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test_gxs_function.R:893:3
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─xpectr::strip(...)
    5. │ └─checkmate::assert_character(...)
    6. │   └─checkmate::checkCharacter(...)
    7. │     └─... %and% ...
    8. │       └─base::isTRUE(lhs)
    9. ├─xpectr::gxs_function(...)
   10. │ ├─... %>% unlist(recursive = TRUE)
   11. │ └─plyr::llply(...)
   12. │   ├─base::structure(lapply(pieces, .fun, ...), dim = dim(pieces))
   13. │   └─base::lapply(pieces, .fun, ...)
   14. │     └─xpectr (local) FUN(X[[i]], ...)
   15. │       └─xpectr::gxs_selection(...)
   16. │         └─xpectr:::create_expectations_vector(...)
   17. │           └─xpectr::element_lengths(data, length)
   18. │             └─base::unlist(lapply(x, length), use.names = keep_names)
   19. └─base::unlist(., recursive = TRUE)
  ── Error ('test_gxs_selection.R:420:3'): list of lists expectations are created properly with gxs_selection() ──
  Error in `unlist(x, recursive, use.names)`: NA in coercion to boolean
  Backtrace:
      ▆
   1. └─xpectr::gxs_selection("l2", sample_n = 2, out = "return") at test_gxs_selection.R:420:3
   2.   └─xpectr:::create_expectations_vector(...)
   3.     └─xpectr::element_lengths(data, length)
   4.       └─base::unlist(lapply(x, length), use.names = keep_names)
  ── Error ('test_gxs_selection.R:531:3'): vector expectations are created properly with gxs_selection() ──
  Error in `unlist(x, recursive, use.names)`: NA in coercion to boolean
  Backtrace:
      ▆
   1. └─xpectr::gxs_selection("vec_1", out = "return") at test_gxs_selection.R:531:3
   2.   └─xpectr:::create_expectations_vector(...)
   3.     └─xpectr::element_lengths(data, length)
   4.       └─base::unlist(lapply(x, length), use.names = keep_names)
  ── Error ('test_gxs_selection.R:687:3'): NA expectations are created properly with gxs_selection() ──
  Error in `unlist(x, recursive, use.names)`: NA in coercion to boolean
  Backtrace:
      ▆
   1. └─xpectr::gxs_selection("NA", out = "return") at test_gxs_selection.R:687:3
   2.   └─xpectr:::create_expectations_vector(...)
   3.     └─xpectr::element_lengths(data, length)
   4.       └─base::unlist(lapply(x, length), use.names = keep_names)
  ── Error ('test_gxs_selection.R:788:3'): single number expectations are created properly with gxs_selection() ──
  Error in `unlist(x, recursive, use.names)`: NA in coercion to boolean
  Backtrace:
      ▆
   1. └─xpectr::gxs_selection("1", out = "return") at test_gxs_selection.R:788:3
   2.   └─xpectr:::create_expectations_vector(...)
   3.     └─xpectr::element_lengths(data, length)
   4.       └─base::unlist(lapply(x, length), use.names = keep_names)
  ── Error ('test_gxs_selection.R:2230:3'): round_to_tolerance argument is properly used ──
  Error in `unlist(x, recursive, use.names)`: NA in coercion to boolean
  Backtrace:
      ▆
   1. └─xpectr::gxs_selection(...) at test_gxs_selection.R:2230:3
   2.   └─xpectr:::create_expectations_vector(...)
   3.     └─xpectr::element_lengths(data, length)
   4.       └─base::unlist(lapply(x, length), use.names = keep_names)
  
  [ FAIL 8 | WARN 0 | SKIP 2 | PASS 620 ]
  Error: Test failures
  Execution halted