Running ‘testthat.R’ [31s/46s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(sparseR)
  > 
  > test_check(package = "sparseR")
  [ FAIL 2 | WARN 0 | SKIP 3 | PASS 31 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (3)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_sparseR_matrix.R:39:1'): (code run outside of `test_that()`) ───
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_knn()`: Error in `step_impute_knn()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─recipes::bake(sparseR_prep(case ~ ., data = cleveland), cleveland) at test_sparseR_matrix.R:39:0
    2. ├─sparseR::sparseR_prep(case ~ ., data = cleveland)
    3. │ ├─recipes::bake(prep(rec_obj, data), all_outcomes(), new_data = data)
    4. │ ├─recipes::prep(rec_obj, data)
    5. │ └─recipes:::prep.recipe(rec_obj, data)
    6. │   ├─recipes:::recipes_error_context(...)
    7. │   │ ├─base::withCallingHandlers(...)
    8. │   │ └─base::force(expr)
    9. │   ├─recipes::bake(x$steps[[i]], new_data = training)
   10. │   └─recipes:::bake.step_impute_knn(x$steps[[i]], new_data = training)
   11. │     ├─base::`[<-`(`*tmp*`, missing_rows, imp_var, value = `<fct>`)
   12. │     └─tibble:::`[<-.tbl_df`(`*tmp*`, missing_rows, imp_var, value = `<fct>`)
   13. │       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   14. │         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15. │           ├─base::withCallingHandlers(...)
   16. │           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
   17. └─base::.handleSimpleError(...)
   18.   └─recipes (local) h(simpleError(msg, call))
   19.     └─recipes:::stop_recipes_step(call = call(step_name), parent = cnd)
   20.       └─recipes:::stop_recipes(...)
   21.         └─rlang::abort(...)
  ── Error ('test_sparseR_surv.R:39:3'): Different vals of k and poly work, sheddon ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_knn()`: Error in `step_impute_knn()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─sparseR::sparseR_prep(formula = ~., data = Z) at test_sparseR_surv.R:39:2
    2. │ └─... %>% prep(data)
    3. ├─recipes::prep(., data)
    4. ├─recipes:::prep.recipe(., data)
    5. │ ├─recipes:::recipes_error_context(...)
    6. │ │ ├─base::withCallingHandlers(...)
    7. │ │ └─base::force(expr)
    8. │ ├─recipes::bake(x$steps[[i]], new_data = training)
    9. │ └─recipes:::bake.step_impute_knn(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, missing_rows, imp_var, value = `<fct>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, missing_rows, imp_var, value = `<fct>`)
   12. │     └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   13. │       └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   14. │         ├─base::withCallingHandlers(...)
   15. │         └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
   16. └─base::.handleSimpleError(...)
   17.   └─recipes (local) h(simpleError(msg, call))
   18.     └─recipes:::stop_recipes_step(call = call(step_name), parent = cnd)
   19.       └─recipes:::stop_recipes(...)
   20.         └─rlang::abort(...)
  
  [ FAIL 2 | WARN 0 | SKIP 3 | PASS 31 ]
  Error: Test failures
  Execution halted