Running ‘testthat.R’ [5s/5s]
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/testing-design.html#sec-tests-files-overview
  > # * https://testthat.r-lib.org/articles/special-files.html
  > 
  > library(testthat)
  > library(mrIML)
  No methods found in package 'workflows' for request: 'predict.workflow' when loading 'mrIML'
  > 
  > test_check("mrIML")
  
    |                                                                            
    |                                                                      |   0%
    |                                                                            
    |==================                                                    |  25%Saving _problems/test-mrIMLpredicts-164.R
  [ FAIL 1 | WARN 3 | SKIP 4 | PASS 3 ]
  
  ══ Skipped tests (4) ═══════════════════════════════════════════════════════════
  • On CRAN (4): 'test-mrBootstrap.R:48:3', 'test-mrIMLpredicts.R:48:3',
    'test-mrIMLpredicts.R:105:3', 'test-mrIMLpredicts.R:142:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-mrIMLpredicts.R:158:3'): expected dimensions of mrIML obj ──────
  Error in `tune_race_anova_workflow(object, resamples = resamples, grid = grid, metrics = metrics, eval_time = eval_time, param_info = param_info, control = control)`: a <control_race> object cannot be coerced to a <control_grid> object.
  i The argument `workflow_size` is missing.
  Backtrace:
       ▆
    1. ├─mrIML::mrIMLpredicts(...) at test-mrIMLpredicts.R:158:3
    2. │ └─future.apply::future_lapply(...)
    3. │   └─future.apply:::future_xapply(...)
    4. │     ├─base::tryCatch(...)
    5. │     │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
    6. │     │   ├─base (local) tryCatchOne(...)
    7. │     │   │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
    8. │     │   └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
    9. │     │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   10. │     │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   11. │     └─future::future(...)
   12. │       ├─future::run(future)
   13. │       └─future:::run.Future(future)
   14. │         ├─base::tryCatch(...)
   15. │         │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   16. │         │   ├─base (local) tryCatchOne(...)
   17. │         │   │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   18. │         │   └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
   19. │         │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   20. │         │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   21. │         ├─future::launchFuture(backend, future = future)
   22. │         └─future:::launchFuture.SequentialFutureBackend(backend, future = future)
   23. │           └─future:::evalFuture(data)
   24. │             ├─base::tryCatch(...)
   25. │             │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   26. │             │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   27. │             │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   28. │             └─future:::evalFutureInternal(data)
   29. │               ├─base::tryCatch(...)
   30. │               │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   31. │               │   ├─base (local) tryCatchOne(...)
   32. │               │   │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   33. │               │   └─base (local) tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
   34. │               │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   35. │               │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   36. │               ├─base::tryCatch(...)
   37. │               │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   38. │               ├─base::withCallingHandlers(...)
   39. │               ├─base::withVisible(...)
   40. │               └─base::eval(expr, envir = globalenv())
   41. │                 └─base::eval(expr, envir = globalenv())
   42. ├─base::local(...)
   43. │ └─base::eval.parent(substitute(eval(quote(expr), envir)))
   44. │   └─base::eval(expr, p)
   45. │     └─base::eval(expr, p)
   46. └─base::eval(...)
   47.   └─base::eval(...)
   48.     ├─base::do.call(...)
   49.     └─`<fn>`()
   50.       └─base::lapply(...)
   51.         └─FUN(X[[i]], ...)
   52.           └─mrIML (local) ...future.FUN(...future.X_jj, ...)
   53.             └─mrIML:::mrIML_internal_fit_function(...)
   54.               ├─finetune::tune_race_anova(mod_workflow, resamples = data_cv)
   55.               └─finetune:::tune_race_anova.workflow(mod_workflow, resamples = data_cv)
   56.                 └─finetune:::tune_race_anova_workflow(...)
   57.                   └─parsnip::condense_control(control, tune::control_grid())
   58.                     └─cli::cli_abort(...)
   59.                       └─rlang::abort(...)
  
  [ FAIL 1 | WARN 3 | SKIP 4 | PASS 3 ]
  Error:
  ! Test failures.
  Execution halted