Running ‘spelling.R’
  Running ‘testthat.R’ [23s/64s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(discrim)
  Loading required package: parsnip
  > 
  > test_check("discrim")
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure (test-flexible.R:106:3): api errors ─────────────────────────────────
  `discrim_flexible() %>% set_engine("monday")` threw an error with unexpected message.
  Expected match: "Engine 'monday' is not available"
  Actual message: "Available engines are: 'earth'"
  Backtrace:
      █
   1. ├─testthat::expect_error(...) test-flexible.R:106:2
   2. │ └─testthat:::quasi_capture(...)
   3. │   ├─testthat:::.capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. ├─discrim_flexible() %>% set_engine("monday")
   7. └─parsnip::set_engine(., "monday")
   8.   └─parsnip:::check_engine(object)
   9.     └─parsnip:::stop_incompatible_engine(avail_eng)
  ── Failure (test-linear-fda.R:107:3): api errors ───────────────────────────────
  `discrim_linear() %>% set_engine("monday")` threw an error with unexpected message.
  Expected match: "Engine 'monday' is not available"
  Actual message: "Available engines are: 'MASS', 'mda'"
  Backtrace:
      █
   1. ├─testthat::expect_error(...) test-linear-fda.R:107:2
   2. │ └─testthat:::quasi_capture(...)
   3. │   ├─testthat:::.capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. ├─discrim_linear() %>% set_engine("monday")
   7. └─parsnip::set_engine(., "monday")
   8.   └─parsnip:::check_engine(object)
   9.     └─parsnip:::stop_incompatible_engine(avail_eng)
  ── Failure (test-linear-lda.R:132:3): api errors ───────────────────────────────
  `discrim_linear() %>% set_engine("lda")` threw an error with unexpected message.
  Expected match: "Engine 'lda' is not available"
  Actual message: "Available engines are: 'MASS', 'mda'"
  Backtrace:
      █
   1. ├─testthat::expect_error(...) test-linear-lda.R:132:2
   2. │ └─testthat:::quasi_capture(...)
   3. │   ├─testthat:::.capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. ├─discrim_linear() %>% set_engine("lda")
   7. └─parsnip::set_engine(., "lda")
   8.   └─parsnip:::check_engine(object)
   9.     └─parsnip:::stop_incompatible_engine(avail_eng)
  ── Failure (test-naive-Bayes.R:190:3): api errors ──────────────────────────────
  `naive_Bayes() %>% set_engine("lda")` threw an error with unexpected message.
  Expected match: "Engine 'lda' is not available"
  Actual message: "Available engines are: 'klaR', 'naivebayes'"
  Backtrace:
      █
   1. ├─testthat::expect_error(naive_Bayes() %>% set_engine("lda"), regexp = "Engine 'lda' is not available") test-naive-Bayes.R:190:2
   2. │ └─testthat:::quasi_capture(...)
   3. │   ├─testthat:::.capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. ├─naive_Bayes() %>% set_engine("lda")
   7. └─parsnip::set_engine(., "lda")
   8.   └─parsnip:::check_engine(object)
   9.     └─parsnip:::stop_incompatible_engine(avail_eng)
  ── Failure (test-naive-Bayes_naivebayes.R:192:3): api errors ───────────────────
  `naive_Bayes() %>% set_engine("lda")` threw an error with unexpected message.
  Expected match: "Engine 'lda' is not available"
  Actual message: "Available engines are: 'klaR', 'naivebayes'"
  Backtrace:
      █
   1. ├─testthat::expect_error(naive_Bayes() %>% set_engine("lda"), "Engine 'lda' is not available") test-naive-Bayes_naivebayes.R:192:2
   2. │ └─testthat:::quasi_capture(...)
   3. │   ├─testthat:::.capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. ├─naive_Bayes() %>% set_engine("lda")
   7. └─parsnip::set_engine(., "lda")
   8.   └─parsnip:::check_engine(object)
   9.     └─parsnip:::stop_incompatible_engine(avail_eng)
  ── Failure (test-rda.R:108:3): api errors ──────────────────────────────────────
  `discrim_regularized() %>% set_engine("monday")` threw an error with unexpected message.
  Expected match: "Engine 'monday' is not available"
  Actual message: "Available engines are: 'klaR'"
  Backtrace:
      █
   1. ├─testthat::expect_error(...) test-rda.R:108:2
   2. │ └─testthat:::quasi_capture(...)
   3. │   ├─testthat:::.capture(...)
   4. │   │ └─base::withCallingHandlers(...)
   5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   6. ├─discrim_regularized() %>% set_engine("monday")
   7. └─parsnip::set_engine(., "monday")
   8.   └─parsnip:::check_engine(object)
   9.     └─parsnip:::stop_incompatible_engine(avail_eng)
  
  [ FAIL 6 | WARN 0 | SKIP 0 | PASS 638 ]
  Error: Test failures
  Execution halted