Running ‘testthat.R’ [20s/34s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(migraph)
  > 
  > test_check("migraph")
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 450 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-model_regression.R:5:1): (code run outside of `test_that()`) ────
  Error in `dplyr::bind_cols(furrr::future_map(glist, function(x) c(x)))`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─migraph::network_reg(...) at test-model_regression.R:5:0
    2. │ └─furrr::future_map_dbl(...)
    3. │   └─furrr:::furrr_map_template(...)
    4. │     └─furrr:::furrr_template(...)
    5. │       └─future::future(...)
    6. │         ├─future::run(future)
    7. │         └─future:::run.Future(future)
    8. │           ├─future::run(future)
    9. │           └─future:::run.UniprocessFuture(future)
   10. │             └─base::eval(expr, envir = envir, enclos = baseenv())
   11. │               └─base::eval(expr, envir = envir, enclos = baseenv())
   12. │                 ├─base::tryCatch(...)
   13. │                 │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   14. │                 │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   15. │                 │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   16. │                 ├─base::withCallingHandlers(...)
   17. │                 ├─base::withVisible(...)
   18. │                 ├─base::local(...)
   19. │                 │ └─base::eval.parent(substitute(eval(quote(expr), envir)))
   20. │                 │   └─base::eval(expr, p)
   21. │                 │     └─base::eval(expr, p)
   22. │                 └─base::eval(...)
   23. │                   └─base::eval(...)
   24. │                     ├─base::do.call(...furrr_map_fn, args)
   25. │                     └─purrr (local) `<fn>`(.x = `<int>`, .f = `<fn>`)
   26. │                       └─migraph (local) .f(.x[[i]], ...)
   27. │                         └─migraph (local) ...furrr_fn(...)
   28. │                           └─migraph:::nlmfit(...)
   29. │                             ├─base::as.matrix(...)
   30. │                             └─migraph:::vectorise_list(...)
   31. │                               ├─base::suppressMessages(...)
   32. │                               │ └─base::withCallingHandlers(...)
   33. │                               ├─stats::na.omit(dplyr::bind_cols(furrr::future_map(glist, function(x) c(x))))
   34. │                               └─dplyr::bind_cols(furrr::future_map(glist, function(x) c(x)))
   35. │                                 ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
   36. │                                 │ └─base::withCallingHandlers(...)
   37. │                                 └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
   38. ├─vctrs:::describe_repair(`<chr>`, `<chr>`)
   39. │ └─rlang::names_inform_repair(orig_names, names)
   40. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   41. │     ├─base::withRestarts(...)
   42. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   43. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   44. │     └─base::signalCondition(cnd)
   45. │       ├─base::conditionMessage(cond)
   46. │       └─rlang:::conditionMessage.rlang_message(cond)
   47. │         └─rlang::cnd_message(c)
   48. │           └─rlang:::cnd_message_format(cnd, ...)
   49. │             └─rlang (local) cli_format(glue_escape(lines))
   50. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   51. │                 └─cli::cli_format(x, .envir = emptyenv())
   52. │                   └─cli:::fmt(...)
   53. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   54. │                       ├─base::do.call(app[[msg$type]], msg$args)
   55. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-18", class = NULL)
   56. │                         └─cli:::clii_bullets(app, text, id, class)
   57. │                           └─base::lapply(...)
   58. │                             └─cli (local) FUN(X[[i]], ...)
   59. │                               └─app$text(text[[i]])
   60. │                                 └─cli:::clii_text(app, text)
   61. │                                   └─app$xtext(text)
   62. │                                     └─cli:::clii__xtext(...)
   63. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   64. │                                         └─base::lapply(pars, ansi_trimws)
   65. │                                           └─cli (local) FUN(X[[i]], ...)
   66. └─base::.handleSimpleError(...)
   67.   └─dplyr (local) h(simpleError(msg, call))
   68.     └─rlang::cnd_signal(cnd)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 450 ]
  Error: Test failures
  Execution halted