Running 'testthat.R' [8s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(sfcr)
  > 
  > test_check("sfcr")
  [ FAIL 22 | WARN 0 | SKIP 0 | PASS 6 ]
  
  == Failed tests ================================================================
  -- Error ('test-new_sfcr_tbl.R:17'): (code run outside of `test_that()`) -------
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
      x
   1. +-sfcr:::.sfcr_find_order(eqs) at test-new_sfcr_tbl.R:17:0
   2. | \-sfcr:::.eq_as_tb(equations)
   3. |   \-... %>% unlist
   4. +-base::unlist(.)
   5. \-base::loadNamespace(x)
   6.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:19'): Missing exogenous values returns an error --
  `sfcr_baseline(eqs, ext, periods = 10)` threw an error with unexpected message.
  Expected match: "object 'G_d' not found"
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:19:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 10)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_baseline.R:23'): Number of columns equals to number of endogenous, exogenous, and parameters plus one --
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
       x
    1. +-testthat::expect_equal(...) at test-sfcr_baseline.R:23:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-base::ncol(sfcr_baseline(eqs, ext, periods = 10))
    5. +-sfcr::sfcr_baseline(eqs, ext, periods = 10)
    6. | \-sfcr:::.eq_as_tb(external)
    7. |   \-... %>% unlist
    8. +-base::unlist(.)
    9. \-base::loadNamespace(x)
   10.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:28'): Error if random noise is included ------
  `sfcr_baseline(eqs, ext, periods = 5)` threw an error with unexpected message.
  Expected match: "Please define random variations as an external parameter."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:28:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 5)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_baseline.R:44'): No error if name overlap with leading '.' and '_' --
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
      x
   1. +-testthat::expect_s3_class(...) at test-sfcr_baseline.R:44:2
   2. | \-testthat::quasi_label(enquo(object), arg = "object")
   3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
   4. +-sfcr::sfcr_baseline(eqs, ext, periods = 5)
   5. | \-sfcr:::.eq_as_tb(external)
   6. |   \-... %>% unlist
   7. +-base::unlist(.)
   8. \-base::loadNamespace(x)
   9.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_baseline.R:55'): No error if name overlap with trailing '.' and '_' --
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
      x
   1. +-testthat::expect_s3_class(...) at test-sfcr_baseline.R:55:2
   2. | \-testthat::quasi_label(enquo(object), arg = "object")
   3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
   4. +-sfcr::sfcr_baseline(eqs, ext, periods = 5, method = "Gauss")
   5. | \-sfcr:::.eq_as_tb(external)
   6. |   \-... %>% unlist
   7. +-base::unlist(.)
   8. \-base::loadNamespace(x)
   9.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:61'): Error if duplicated endogenous variables --
  `sfcr_baseline(eqs, ext, periods = 2)` threw an error with unexpected message.
  Expected match: "The endogenous variable `H_s` was defined more than once. Please check your model and try again."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:61:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 2)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:67'): Error if two duplicated endogenous variables --
  `sfcr_baseline(eqs, ext, periods = 2)` threw an error with unexpected message.
  Expected match: "The endogenous variables `H_s, N_d` were defined more than once. Please check your model and try again."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:67:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 2)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:73'): Error if invalid name .i in endogenous variables --
  `sfcr_baseline(eqs, ext, periods = 2)` threw an error with unexpected message.
  Expected match: "Invalid name detected! Please don't use \".i\" to name any variable."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:73:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 2)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:78'): Error if invalid name .i in external variables --
  `sfcr_baseline(eqs, ext, periods = 2)` threw an error with unexpected message.
  Expected match: "Invalid name detected! Please don't use \".i\" to name any variable."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:78:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 2)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:83'): Error if length of exogenous variables is not equal to one or to the length of the model. --
  `sfcr_baseline(eqs, ext, periods = 15)` threw an error with unexpected message.
  Expected match: "The exogenous variables must have either length 1 or exactly the same length as the baseline model."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:83:1
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 15)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_baseline.R:88'): Only warning if exogenous variable has the same length as periods --
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
       x
    1. +-testthat::expect_warning(...) at test-sfcr_baseline.R:88:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 15)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:93'): Periods cannot be smaller than 2 -------
  `sfcr_baseline(eqs, ext, periods = 1)` threw an error with unexpected message.
  Expected match: "The minimum periods required to simulate a model is 2."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:93:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 1)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:98'): Periods cannot be smaller than 2 -------
  `sfcr_baseline(eqs, ext, periods = -10)` threw an error with unexpected message.
  Expected match: "The minimum periods required to simulate a model is 2."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:98:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = -10)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_baseline.R:103'): Periods cannot be smaller than 2 ------
  `sfcr_baseline(eqs, ext, periods = 0)` threw an error with unexpected message.
  Expected match: "The minimum periods required to simulate a model is 2."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_baseline.R:103:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_baseline(eqs, ext, periods = 0)
    7. | \-sfcr:::.eq_as_tb(external)
    8. |   \-... %>% unlist
    9. +-base::unlist(.)
   10. \-base::loadNamespace(x)
   11.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_baseline.R:109'): No error if periods are defined outside function call --
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
      x
   1. +-testthat::expect_length(...) at test-sfcr_baseline.R:109:2
   2. | \-testthat::quasi_label(enquo(object), arg = "object")
   3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
   4. +-sfcr::sfcr_baseline(eqs, ext, periods = 15)
   5. | \-sfcr:::.eq_as_tb(external)
   6. |   \-... %>% unlist
   7. +-base::unlist(.)
   8. \-base::loadNamespace(x)
   9.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_expand.R:3'): Quasiquotation works ------------------------
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
       x
    1. +-testthat::expect_s3_class(...) at test-sfcr_expand.R:3:2
    2. | \-testthat::quasi_label(enquo(object), arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-sfcr::sfcr_expand(...)
    5. +-sfcr:::sfcr_expand.sfcr_set(...)
    6. | +-sfcr:::abortifnot(variable %in% .eq_as_tb(x)$lhs, "Please supply a valid variable name that is present in the external set.")
    7. | | \-base::isFALSE(cnd)
    8. | +-variable %in% .eq_as_tb(x)$lhs
    9. | \-sfcr:::.eq_as_tb(x)
   10. |   \-... %>% unlist
   11. +-base::unlist(.)
   12. \-base::loadNamespace(x)
   13.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_expand.R:8'): Find correct name ---------------------------
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
       x
    1. +-testthat::expect_s3_class(...) at test-sfcr_expand.R:8:2
    2. | \-testthat::quasi_label(enquo(object), arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-sfcr::sfcr_expand(...)
    5. +-sfcr:::sfcr_expand.sfcr_set(...)
    6. | +-sfcr:::abortifnot(variable %in% .eq_as_tb(x)$lhs, "Please supply a valid variable name that is present in the external set.")
    7. | | \-base::isFALSE(cnd)
    8. | +-variable %in% .eq_as_tb(x)$lhs
    9. | \-sfcr:::.eq_as_tb(x)
   10. |   \-... %>% unlist
   11. +-base::unlist(.)
   12. \-base::loadNamespace(x)
   13.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_expand.R:13'): Missing variable in x returns an error ---
  `sfcr_expand(...)` threw an error with unexpected message.
  Expected match: "Please supply a valid variable name that is present in the external set."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_expand.R:13:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_expand(...)
    7. +-sfcr:::sfcr_expand.sfcr_set(...)
    8. | +-sfcr:::abortifnot(variable %in% .eq_as_tb(x)$lhs, "Please supply a valid variable name that is present in the external set.")
    9. | | \-base::isFALSE(cnd)
   10. | +-variable %in% .eq_as_tb(x)$lhs
   11. | \-sfcr:::.eq_as_tb(x)
   12. |   \-... %>% unlist
   13. +-base::unlist(.)
   14. \-base::loadNamespace(x)
   15.   \-base::library.dynam(lib, package, package.lib)
  -- Failure ('test-sfcr_expand.R:25'): Error if invalid name --------------------
  `sfcr_expand(...)` threw an error with unexpected message.
  Expected match: "Please supply a valid variable name."
  Actual message: "DLL 'purrr' not found: maybe not installed for this architecture?"
  Backtrace:
       x
    1. +-testthat::expect_error(...) at test-sfcr_expand.R:25:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat (local) .capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-sfcr::sfcr_expand(...)
    7. +-sfcr:::sfcr_expand.sfcr_set(...)
    8. | +-sfcr:::abortifnot(variable %in% .eq_as_tb(x)$lhs, "Please supply a valid variable name that is present in the external set.")
    9. | | \-base::isFALSE(cnd)
   10. | +-variable %in% .eq_as_tb(x)$lhs
   11. | \-sfcr:::.eq_as_tb(x)
   12. |   \-... %>% unlist
   13. +-base::unlist(.)
   14. \-base::loadNamespace(x)
   15.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_sankey.R:17'): (code run outside of `test_that()`) --------
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
      x
   1. +-sfcr::sfcr_baseline(eqs, ext, 50) at test-sfcr_sankey.R:17:0
   2. | \-sfcr:::.eq_as_tb(external)
   3. |   \-... %>% unlist
   4. +-base::unlist(.)
   5. \-base::loadNamespace(x)
   6.   \-base::library.dynam(lib, package, package.lib)
  -- Error ('test-sfcr_scenario.R:25'): (code run outside of `test_that()`) ------
  Error in `library.dynam(lib, package, package.lib)`: DLL 'purrr' not found: maybe not installed for this architecture?
  Backtrace:
      x
   1. +-sfcr::sfcr_baseline(...) at test-sfcr_scenario.R:25:0
   2. | \-sfcr:::.eq_as_tb(external)
   3. |   \-... %>% unlist
   4. +-base::unlist(.)
   5. \-base::loadNamespace(x)
   6.   \-base::library.dynam(lib, package, package.lib)
  
  [ FAIL 22 | WARN 0 | SKIP 0 | PASS 6 ]
  Error: Test failures
  Execution halted