Running ‘testthat.R’ [14s/18s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(drape)
  > 
  > test_check("drape")
  [ FAIL 9 | WARN 0 | SKIP 0 | PASS 9 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_average_partial_effect.R:25:3'): drape works with simple nuisance estimators ──
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(out$est, 1) at test_average_partial_effect.R:25:3
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Error ('test_average_partial_effect.R:36:3'): drape works with xgboost nuisance estimators ──
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(out$est, 1) at test_average_partial_effect.R:36:3
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Error ('test_regression_functions.R:5:3'): fit_lasso_poly acts correctly ────
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(out$fit(X), 5) at test_regression_functions.R:5:3
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Error ('test_regression_functions.R:16:3'): fit_xgboost acts correctly ──────
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(out$fit(X), 10) at test_regression_functions.R:16:3
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Error ('test_resmooth.R:5:3'): resmooth acts correctly ──────────────────────
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(sm$pred[[1]], 11) at test_resmooth.R:5:3
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Error ('test_score.R:4:3'): spline_score acts correctly for single df ───────
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(spl$rho(x), size = 10) at test_score.R:4:3
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Error ('test_score.R:16:3'): ng_pseudo_y gives correct form of output ───────
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(ng_pseudo_response(1:5), size = 5) at test_score.R:16:3
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Error ('test_score.R:22:3'): basis_poly acts correctly for single df ────────
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(bs$rho(X), size = 5) at test_score.R:22:3
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  ── Error ('test_simulation_settings.R:6:7'): simulate_data works in simulated settings ──
  <packageNotFoundError/error/condition>
  Error in `loadNamespace(x)`: there is no package called 'vctrs'
  Backtrace:
      ▆
   1. ├─testthat::expect_vector(out$y, size = n) at test_simulation_settings.R:6:7
   2. │ └─base::tryCatch(...)
   3. │   └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4. │     └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5. │       └─base (local) doTryCatch(return(expr), name, parentenv, handler)
   6. └─base::loadNamespace(x)
   7.   └─base::withRestarts(stop(cond), retry_loadNamespace = function() NULL)
   8.     └─base (local) withOneRestart(expr, restarts[[1L]])
   9.       └─base (local) doWithOneRestart(return(expr), restart)
  
  [ FAIL 9 | WARN 0 | SKIP 0 | PASS 9 ]
  Error: Test failures
  Execution halted