Running ‘testthat.R’ [11s/25s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > Sys.setenv("R_TESTS" = "")
  > 
  > library(testthat)
  > 
  > test_check("skpr")
  Loading required package: skpr
  Loading required package: shiny
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  ● On CRAN (1)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (testDeltaProcessing.R:5:3): providing anticoef and effectsize to eval_design produces a warning ──
  Error: more elements supplied than there are to replace
  Backtrace:
      █
   1. ├─testthat::expect_warning(...) testDeltaProcessing.R:5:2
   2. │ └─testthat:::quasi_capture(enquo(object), label, capture_warnings)
   3. │   ├─testthat:::.capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. └─skpr::eval_design(...)
   7.   └─skpr:::effectpower(...)
  ── Error (testExampleCode.R:181:3): eval_design example code runs without errors ──
  Error: more elements supplied than there are to replace
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) testExampleCode.R:181:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.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. └─skpr::eval_design(design = optdesign, model = ~A + B + C, alpha = 0.2)
   10.   └─skpr:::effectpower(...)
  ── Error (testExampleCode.R:251:3): eval_design_mc example code runs without errors ──
  Error: more elements supplied than there are to replace
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) testExampleCode.R:251:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.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. └─skpr::eval_design(...)
   10.   └─skpr:::effectpower(...)
  ── Error (testPlottingFunctions.R:22:3): plot_correlations works as intended ───
  Error: more elements supplied than there are to replace
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) testPlottingFunctions.R:22:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.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. ├─skpr::plot_correlations(...)
   10. └─skpr::eval_design(candlist, ~., 0.2)
   11.   └─skpr:::effectpower(...)
  ── Error (testPlottingFunctions.R:41:3): plot_fds works as intended ────────────
  Error: more elements supplied than there are to replace
  Backtrace:
       █
    1. ├─testthat::expect_silent(plot_fds(eval_design(design, ~., 0.2))) testPlottingFunctions.R:41:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.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. ├─skpr::plot_fds(eval_design(design, ~., 0.2))
   10. └─skpr::eval_design(design, ~., 0.2)
   11.   └─skpr:::effectpower(...)
  
  [ FAIL 5 | WARN 0 | SKIP 1 | PASS 340 ]
  Error: Test failures
  Execution halted