Running ‘testthat.R’ [6s/10s]
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(tsissm)
  Loading required package: Rcpp
  Loading required package: tsmethods
  > 
  > test_check("tsissm")
  Error in `source_dir()`:
  ! Failed to evaluate './helper-global.R'.
  Caused by error:
  ! '*this' is not a valid 'advector' (constructed using illegal operation?)
  Backtrace:
       ▆
    1. ├─testthat::test_check("tsissm")
    2. │ └─testthat::test_dir(...)
    3. │   └─testthat:::test_files(...)
    4. │     └─testthat:::test_files_serial(...)
    5. │       └─testthat:::test_files_setup_state(...)
    6. │         └─testthat::source_test_helpers(".", env)
    7. │           └─testthat::source_dir(path, "^helper.*\\.[rR]$", env = env, wrap = FALSE)
    8. │             └─base::lapply(...)
    9. │               └─testthat (local) FUN(X[[i]], ...)
   10. │                 └─testthat::source_file(...)
   11. │                   ├─base::withCallingHandlers(...)
   12. │                   └─base::eval(exprs, env)
   13. │                     └─base::eval(exprs, env)
   14. │                       ├─tsmethods::estimate(spec_constant_benchmark) at ./helper-global.R:7:1
   15. │                       └─tsissm:::estimate.tsissm.spec(spec_constant_benchmark)
   16. │                         └─tsissm:::.estimate_ad_constant(...)
   17. │                           └─tsissm:::issm_constraint(fun$par, fun, issmenv)
   18. │                             └─RTMB (local) makeADFun2(...)
   19. │                               └─obj$retape()
   20. │                                 └─RTMB:::MakeADFunObject(...)
   21. │                                   └─RTMB:::.MakeTape(mapfunc, obj$env$par)
   22. │                                     └─RTMB (local) f(x)
   23. │                                       └─tsissm (local) func(pl)
   24. │                                         ├─base::eigen(D, symmetric = FALSE, only.values = TRUE)
   25. │                                         └─RTMB::eigen(D, symmetric = FALSE, only.values = TRUE)
   26. │                                           ├─base::eigen(x, symmetric, only.values, EISPACK)
   27. │                                           └─RTMB::eigen(x, symmetric, only.values, EISPACK)
   28. │                                             └─RTMB::Math.advector(colSums(Re(V * Conj(V))))
   29. │                                               └─RTMB:::Math1(x, .Generic, ...)
   30. ├─base::stop(`<Rcpp::xc>`)
   31. └─testthat (local) `<fn>`(`<Rcpp::xc>`)
   32.   └─cli::cli_abort(...)
   33.     └─rlang::abort(...)
  Execution halted