Running ‘testthat.R’ [104s/160s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(parsnip)
  > 
  > test_check("parsnip")
  
  Attaching package: 'tidyr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  Loading required package: Formula
  Loading required package: plotmo
  Loading required package: plotrix
  Loading required package: TeachingDemos
  [ FAIL 4 | WARN 0 | SKIP 83 | PASS 832 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (72)
  • flexsurv cannot be loaded (2)
  • nnet cannot be loaded (9)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_extract.R:22:3'): extract parameter set from model with no parameters ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─hardhat::extract_parameter_set_dials(lm_model) at test_extract.R:22:2
    2. ├─parsnip:::extract_parameter_set_dials.model_spec(lm_model)
    3. │ ├─generics::tunable(x)
    4. │ ├─parsnip:::tunable.linear_reg(x)
    5. │ ├─base::NextMethod()
    6. │ └─parsnip:::tunable.model_spec(x)
    7. │   └─... %>% ...
    8. ├─dplyr::mutate(...)
    9. ├─dplyr::full_join(...)
   10. └─dplyr:::full_join.data.frame(...)
   11.   └─dplyr:::join_mutate(...)
   12.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   13.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   14.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   15.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   16.           ├─base::withCallingHandlers(...)
   17.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_extract.R:34:3'): extract parameter set from model with main and engine parameters ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─hardhat::extract_parameter_set_dials(bst_model) at test_extract.R:34:2
    2. ├─parsnip:::extract_parameter_set_dials.model_spec(bst_model)
    3. │ ├─generics::tunable(x)
    4. │ ├─parsnip:::tunable.boost_tree(x)
    5. │ ├─base::NextMethod()
    6. │ └─parsnip:::tunable.model_spec(x)
    7. │   └─... %>% ...
    8. ├─dplyr::mutate(...)
    9. ├─dplyr::full_join(...)
   10. └─dplyr:::full_join.data.frame(...)
   11.   └─dplyr:::join_mutate(...)
   12.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   13.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   14.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   15.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   16.           ├─base::withCallingHandlers(...)
   17.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test_extract.R:76:3'): extract single parameter from model with main and engine parameters ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test_extract.R:76:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─hardhat::extract_parameter_dials(bst_model, parameter = "funky name \n")
    5. ├─parsnip:::extract_parameter_dials.model_spec(bst_model, parameter = "funky name \n")
    6. │ ├─hardhat::extract_parameter_dials(...)
    7. │ ├─hardhat::extract_parameter_set_dials(x)
    8. │ └─parsnip:::extract_parameter_set_dials.model_spec(x)
    9. │   ├─generics::tunable(x)
   10. │   ├─parsnip:::tunable.boost_tree(x)
   11. │   ├─base::NextMethod()
   12. │   └─parsnip:::tunable.model_spec(x)
   13. │     └─... %>% ...
   14. ├─dplyr::mutate(...)
   15. ├─dplyr::full_join(...)
   16. └─dplyr:::full_join.data.frame(...)
   17.   └─dplyr:::join_mutate(...)
   18.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   19.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   20.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   21.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   22.           ├─base::withCallingHandlers(...)
   23.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test_extract.R:93:3'): extract_parameter_dials doesn't error if namespaced args are used ──
  `extract_parameter_dials(bst_model, parameter = "penalty")` threw an unexpected error.
  Message: DLL requires the use of native symbols
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test_extract.R:93:2
    2. │ └─testthat:::expect_condition_matching(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─hardhat::extract_parameter_dials(bst_model, parameter = "penalty")
    8. ├─parsnip:::extract_parameter_dials.model_spec(bst_model, parameter = "penalty")
    9. │ ├─hardhat::extract_parameter_dials(...)
   10. │ ├─hardhat::extract_parameter_set_dials(x)
   11. │ └─parsnip:::extract_parameter_set_dials.model_spec(x)
   12. │   ├─generics::tunable(x)
   13. │   ├─parsnip:::tunable.logistic_reg(x)
   14. │   ├─base::NextMethod()
   15. │   └─parsnip:::tunable.model_spec(x)
   16. │     └─... %>% ...
   17. ├─dplyr::mutate(...)
   18. ├─dplyr::full_join(...)
   19. └─dplyr:::full_join.data.frame(...)
   20.   └─dplyr:::join_mutate(...)
   21.     ├─base::`[<-`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   22.     └─tibble:::`[<-.tbl_df`(`*tmp*`, new_rows, merge, value = `<tibble[,1]>`)
   23.       └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   24.         └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   25.           ├─base::withCallingHandlers(...)
   26.           └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 4 | WARN 0 | SKIP 83 | PASS 832 ]
  Error: Test failures
  Execution halted