Running ‘testthat.R’ [158s/157s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(isotracer)
  To automatically run isotracer in parallel on a multicore CPU, you can call:
    options(mc.cores = parallel::detectCores())
  
  
  Attaching package: 'isotracer'
  
  The following object is masked from 'package:stats':
  
      filter
  
  > 
  > test_check("isotracer")
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 503 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-steady-states-flows-pred.R:328:3'): Predictions for open network, multiple units, one steady, one split ──
  <purrr_error_indexed/rlang_error/error/condition>
  Error in `purrr::map(seq_len(nrow(nm)), function(k) {
      nmRow <- nm[k, ]
      sizes <- list()
      for (i in seq_len(nrow(to))) {
          nmRow <- set_params(nmRow, to$mcmc.parameters[[i]], force = TRUE)
          sizes[[i]] <- calculate_steady_state_one_row(nmRow)
      }
      out <- to
      out$stable_sizes <- sizes
      return(out)
  })`: ℹ In index: 2.
  Caused by error in `calculate_steady_state_one_row()`:
  ! Eigenvector incompatible with steady state compartments.
  Backtrace:
       ▆
    1. ├─isotracer::tidy_steady_states(m, r) at test-steady-states-flows-pred.R:328:3
    2. │ └─purrr::map(...)
    3. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
    4. │     ├─purrr:::with_indexed_errors(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     ├─purrr:::call_with_cleanup(...)
    7. │     └─isotracer (local) .f(.x[[i]], ...)
    8. │       └─isotracer:::calculate_steady_state_one_row(nmRow)
    9. │         └─base::stop("Eigenvector incompatible with steady state compartments.")
   10. └─base::.handleSimpleError(...)
   11.   └─purrr (local) h(simpleError(msg, call))
   12.     └─cli::cli_abort(...)
   13.       └─rlang::abort(...)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 503 ]
  Error: Test failures
  Execution halted