Running ‘testthat.R’ [41s/65s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(themis)
  Loading required package: recipes
  Loading required package: dplyr
  
  Attaching package: 'dplyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  The following objects are masked from 'package:stats':
  
      filter, lag
  
  The following objects are masked from 'package:base':
  
      intersect, setdiff, setequal, union
  
  
  Attaching package: 'recipes'
  
  The following object is masked from 'package:stats':
  
      step
  
  > 
  > test_check("themis")
  [ FAIL 9 | WARN 0 | SKIP 48 | PASS 295 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (48)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-smotenc.R:187:3'): majority classes are ignored if there is more than 1 ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-smotenc.R:187:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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(...)
  ── Error ('test-step_adasyn.R:175:3'): majority classes are ignored if there is more than 1 ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-step_adasyn.R:175:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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(...)
  ── Error ('test-step_bsmote.R:10:3'): all minority classes are upsampled ───────
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-step_bsmote.R:10:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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(...)
  ── Error ('test-step_bsmote.R:208:3'): majority classes are ignored if there is more than 1 ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-step_bsmote.R:208:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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(...)
  ── Error ('test-step_bsmote.R:224:3'): majority classes are ignored if there is more than 1 ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-step_bsmote.R:224:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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(...)
  ── Error ('test-step_downsample.R:145:3'): minority classes are ignored if there is more than 1 ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-step_downsample.R:145:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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(...)
  ── Error ('test-step_nearmiss.R:146:3'): minority classes are ignored if there is more than 1 ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-step_nearmiss.R:146:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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(...)
  ── Error ('test-step_smote.R:176:3'): majority classes are ignored if there is more than 1 ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-step_smote.R:176:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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(...)
  ── Error ('test-step_upsample.R:146:3'): majority classes are ignored if there is more than 1 ──
  <recipes_error_step/recipes_error/rlang_error/error/condition>
  Error in `step_impute_mean()`: Error in `step_impute_mean()`:
  Caused by error in `vectbl_assign()`:
  ! DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% bake(new_data = NULL) at test-step_upsample.R:146:2
    2. ├─recipes::bake(., new_data = NULL)
    3. ├─recipes::prep(.)
    4. ├─recipes:::prep.recipe(.)
    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_mean(x$steps[[i]], new_data = training)
   10. │   ├─base::`[<-`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   11. │   └─tibble:::`[<-.tbl_df`(`*tmp*`, is.na(new_data[[i]]), i, value = `<dbl>`)
   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 9 | WARN 0 | SKIP 48 | PASS 295 ]
  Error: Test failures
  Execution halted