Running ‘testthat.R’ [2s/3s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(glinvci)
  > 
  > test_check("glinvci")
  Saving _problems/test-env-34.R
  Saving _problems/test-misc-87.R
  Saving _problems/test-model-no-restriction-46.R
  Saving _problems/test-model-with-restriction-116.R
  [ FAIL 4 | WARN 0 | SKIP 0 | PASS 34 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-env.R:30:3'): Dynamic scoping ──────────────────────────────────
  Error in `glinv(tr, x0, X, pardims = 9, parfns = my_par, parjacs = my_jac, parhess = my_hess)`: All dimensions at Node #1 are either lost or missing
  Backtrace:
      ▆
   1. └─glinvci::glinv(...) at test-env.R:30:3
  ── Error ('test-misc.R:87:44'): Weird trees, null data and reset missing tip masks ──
  Error in `set_tips.glinv(mod, NAify(rglinv(mod, truth, Nsamp = 1)[[1]]))`: All dimensions at Node #1 are either lost or missing
  Backtrace:
      ▆
   1. └─glinvci (local) nullify_interleave(...) at test-misc.R:76:3
   2.   └─base::Reduce(function(acc, f) f(acc), fnlist_p, mod) at test-misc.R:9:5
   3.     └─glinvci (local) f(init, x[[i]])
   4.       └─glinvci (local) f(acc) at test-misc.R:9:12
   5.         ├─testthat::expect_is(...) at test-misc.R:87:44
   6.         │ └─testthat::quasi_label(enquo(object), label)
   7.         │   └─rlang::eval_bare(expr, quo_get_env(quo))
   8.         ├─glinvci::set_tips(mod, NAify(rglinv(mod, truth, Nsamp = 1)[[1]]))
   9.         └─glinvci:::set_tips.glinv(mod, NAify(rglinv(mod, truth, Nsamp = 1)[[1]]))
  ── Error ('test-model-no-restriction.R:42:9'): Without reparameterisation ──────
  Error in `glinv(D$tr, D$x0, D$x, parfns = list(ou_zaplost(oupar)), pardims = list(nparams_ou(D$k)), parjacs = list(dou_zaplost(oujac)), parhess = list(hou_zaplost(ouhess)))`: All dimensions at Node #1 are either lost or missing
  Backtrace:
      ▆
   1. └─glinvci::glinv(...) at test-model-no-restriction.R:42:9
  ── Error ('test-model-with-restriction.R:112:13'): With restrictions ───────────
  Error in `glinv(D$tr, D$x0, D$x, parfns = list(eval(parse(text = repar[[j]]$fn))), pardims = list(eval(parse(text = repar[[j]]$npar))), parjacs = list(eval(parse(text = repar[[j]]$jac))), parhess = list(eval(parse(text = repar[[j]]$hess))))`: All dimensions at Node #1 are either lost or missing
  Backtrace:
      ▆
   1. └─glinvci::glinv(...) at test-model-with-restriction.R:112:13
  
  [ FAIL 4 | WARN 0 | SKIP 0 | PASS 34 ]
  Error:
  ! Test failures.
  Execution halted