Running ‘testthat.R’ [16s/28s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > testthat::test_check("TruncExpFam")
  Loading required package: TruncExpFam
  Welcome to TruncExpFam 1.1.0.
  Please read the documentation on ?TruncExpFam to learn more about the package.
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 497 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-direct-sampling.R:7:3'): Original attributes are retrieved ─────
  Error in `mget(ls())`: getting UseMethod variable 'parms' from generic 'rtrunc_direct'; this is no longer supported
  Backtrace:
      ▆
   1. └─TruncExpFam::rtrunc(1e+06, mean = 1, sd = 2, faster = TRUE) at test-direct-sampling.R:7:3
   2.   ├─TruncExpFam::rtrunc_direct(n, family, ...)
   3.   └─TruncExpFam:::rtrunc_direct.normal(n, family, ...)
   4.     ├─TruncExpFam:::truncated_q(...)
   5.     │ └─base::paste0("trunc_", class(parms[["n"]]))
   6.     └─base::mget(ls())
  ── Error ('test-direct-sampling.R:261:3'): Truncation is not a speed limiter ───
  Error in `mget(ls())`: getting UseMethod variable 'parms' from generic 'rtrunc_direct'; this is no longer supported
  Backtrace:
      ▆
   1. ├─testthat::expect_length(...) at test-direct-sampling.R:261:3
   2. │ └─testthat::quasi_label(enquo(object), arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─TruncExpFam::rtrunc(n, mean = 5, sd = 0.2, a = 5.5, faster = TRUE)
   5.   ├─TruncExpFam::rtrunc_direct(n, family, ...)
   6.   └─TruncExpFam:::rtrunc_direct.normal(n, family, ...)
   7.     ├─TruncExpFam:::truncated_q(...)
   8.     │ └─base::paste0("trunc_", class(parms[["n"]]))
   9.     └─base::mget(ls())
  ── Error ('test-direct-sampling.R:407:3'): Truncation limits are respected for faster = TRUE ──
  Error in `mget(ls())`: getting UseMethod variable 'parms' from generic 'rtrunc_direct'; this is no longer supported
  Backtrace:
      ▆
   1. └─TruncExpFam::rtrunc(...) at test-direct-sampling.R:407:3
   2.   ├─TruncExpFam::rtrunc_direct(n, family, ...)
   3.   └─TruncExpFam:::rtrunc_direct.beta(n, family, ...)
   4.     ├─TruncExpFam:::truncated_q(...)
   5.     │ └─base::paste0("trunc_", class(parms[["n"]]))
   6.     └─base::mget(ls())
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 497 ]
  Error: Test failures
  Execution halted