Running ‘testthat.R’ [200s/232s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(censored)
  Loading required package: parsnip
  Loading required package: survival
  > 
  > test_check("censored")
  [ FAIL 12 | WARN 1 | SKIP 4 | PASS 348 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (4)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-bag_tree-rpart.R:68:3'): survival predictions ──────────────────
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-bag_tree-rpart.R:68: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. ├─stats::predict(f_fit, lung, type = "survival")
    8. └─parsnip::predict.model_fit(f_fit, lung, type = "survival")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Failure ('test-bag_tree-rpart.R:112:3'): survival predictions without surrogate splits for NA ──
  `... <- NULL` threw an unexpected error.
  Message: unused argument (eval_time = c(100, 500, 1000))
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-bag_tree-rpart.R:112: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. ├─stats::predict(...)
    8. └─parsnip::predict.model_fit(...)
    9.   ├─parsnip::predict_survival(...)
   10.   └─parsnip::predict_survival.model_fit(...)
   11.     └─rlang::eval_tidy(pred_call)
  ── Error ('test-bag_tree-rpart.R:117:3'): survival predictions without surrogate splits for NA ──
  Error in `eval(code, test_env)`: object 'f_pred' not found
  Backtrace:
      ▆
   1. ├─testthat::expect_equal(nrow(f_pred), nrow(new_data_3)) at test-bag_tree-rpart.R:117:2
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─base::nrow(f_pred)
  ── Error ('test-boost_tree-mboost.R:63:3'): survival predictions ───────────────
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-boost_tree-mboost.R:63: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. ├─stats::predict(f_fit, lung, type = "survival")
    8. └─parsnip::predict.model_fit(f_fit, lung, type = "survival")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Error ('test-decision_tree-partykit.R:66:3'): survival predictions ──────────
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-decision_tree-partykit.R:66: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. ├─stats::predict(f_fit, lung, type = "survival")
    8. └─parsnip::predict.model_fit(f_fit, lung, type = "survival")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Error ('test-decision_tree-rpart.R:55:3'): survival predictions ─────────────
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-decision_tree-rpart.R:55: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. ├─stats::predict(f_fit, lung, type = "survival")
    8. └─parsnip::predict.model_fit(f_fit, lung, type = "survival")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Error ('test-proportional_hazards-survival.R:150:3'): survival predictions without strata ──
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-proportional_hazards-survival.R:150: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. ├─stats::predict(f_fit, lung, type = "survival")
    8. └─parsnip::predict.model_fit(f_fit, lung, type = "survival")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Error ('test-rand_forest-partykit.R:81:3'): survival predictions ────────────
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-rand_forest-partykit.R:81: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. ├─stats::predict(f_fit, lung, type = "survival")
    8. └─parsnip::predict.model_fit(f_fit, lung, type = "survival")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Error ('test-survival_reg-flexsurv.R:53:3'): survival probability prediction ──
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-survival_reg-flexsurv.R:53: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. ├─stats::predict(f_fit, head(lung), type = "survival")
    8. └─parsnip::predict.model_fit(f_fit, head(lung), type = "survival")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Error ('test-survival_reg-flexsurv.R:177:3'): hazard prediction ─────────────
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-survival_reg-flexsurv.R:177: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. ├─stats::predict(f_fit, head(lung), type = "hazard")
    8. └─parsnip::predict.model_fit(f_fit, head(lung), type = "hazard")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Error ('test-survival_reg-survival.R:49:3'): survival probability prediction ──
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-survival_reg-survival.R:49: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. ├─stats::predict(res, head(lung), type = "survival")
    8. └─parsnip::predict.model_fit(res, head(lung), type = "survival")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  ── Error ('test-survival_reg-survival.R:115:3'): survival hazard prediction ────
  Error in `check_pred_type_dots(object, type, ...)`: When using `type` values of 'survival' or 'hazard', a numeric vector `eval_time` should also be given.
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-survival_reg-survival.R:115: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. ├─stats::predict(res, head(lung), type = "hazard")
    8. └─parsnip::predict.model_fit(res, head(lung), type = "hazard")
    9.   └─parsnip:::check_pred_type_dots(object, type, ...)
   10.     └─rlang::abort(...)
  
  [ FAIL 12 | WARN 1 | SKIP 4 | PASS 348 ]
  Error: Test failures
  Execution halted