Running ‘testthat.R’ [7s/10s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(survParamSim)
  > 
  > options(lifecycle_verbosity = "error")
  > test_check("survParamSim")
  ── ERROR (test-calc_hr_pi.R:89:3): check HR calculation ────────────────────────
  Error: The `value` argument of ``names<-`()` can't be NULL as of tibble 3.0.0.
  `names` must not be `NULL`.
  Backtrace:
       █
    1. ├─survParamSim::extract_hr(...) test-calc_hr_pi.R:89:2
    2. │ └─dplyr::select(hr.pi$sim.hr, -description)
    3. └─survParamSim::calc_hr_pi(...)
    4.   └─`%>%`(...)
    5.     ├─base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
    6.     └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
    7.       └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
    8.         └─survParamSim:::`_fseq`(`_lhs`)
    9.           └─magrittr::freduce(value, `_function_list`)
   10.             └─function_list[[i]](value)
   11.               ├─dplyr::group_by(., !!!group.syms, rep)
   12.               └─dplyr:::group_by.data.frame(., !!!group.syms, rep)
   13.                 └─dplyr::grouped_df(groups$data, groups$group_names, .drop)
   14.                   └─dplyr:::compute_groups(data, vars, drop = drop)
   15.                     └─dplyr:::vec_split_id_order(group_vars)
   16.                       ├─vctrs::vec_slice(split_id, vec_order(split_id$key))
   17.                       └─vctrs::vec_order(split_id$key)
   18.                         └─vctrs:::order_proxy(...)
   19.                           ├─vctrs:::map(...)
   20.                           │ └─base::lapply(.x, .f, ...)
   21.                           └─base::unname(proxy)
   22.                             ├─base::`names<-`(`*tmp*`, value = NULL)
   23.                             └─tibble:::`names<-.tbl_df`(`*tmp*`, value = NULL)
   24.                               └─lifecycle::deprecate_soft(...)
   25.                                 └─lifecycle::deprecate_warn(...)
   26.                                   └─lifecycle::deprecate_stop(when, what, with = with, details = details)
  
  ── ERROR (test-calc_hr_pi.R:101:3): check TRT levels assignment ────────────────
  Error: The `value` argument of ``names<-`()` can't be NULL as of tibble 3.0.0.
  `names` must not be `NULL`.
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-calc_hr_pi.R:101:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. └─survParamSim::calc_hr_pi(...)
    5.   └─`%>%`(...)
    6.     ├─base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
    7.     └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
    8.       └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
    9.         └─survParamSim:::`_fseq`(`_lhs`)
   10.           └─magrittr::freduce(value, `_function_list`)
   11.             └─function_list[[i]](value)
   12.               ├─dplyr::group_by(., !!!group.syms, rep)
   13.               └─dplyr:::group_by.data.frame(., !!!group.syms, rep)
   14.                 └─dplyr::grouped_df(groups$data, groups$group_names, .drop)
   15.                   └─dplyr:::compute_groups(data, vars, drop = drop)
   16.                     └─dplyr:::vec_split_id_order(group_vars)
   17.                       ├─vctrs::vec_slice(split_id, vec_order(split_id$key))
   18.                       └─vctrs::vec_order(split_id$key)
   19.                         └─vctrs:::order_proxy(...)
   20.                           ├─vctrs:::map(...)
   21.                           │ └─base::lapply(.x, .f, ...)
   22.                           └─base::unname(proxy)
   23.                             ├─base::`names<-`(`*tmp*`, value = NULL)
   24.                             └─tibble:::`names<-.tbl_df`(`*tmp*`, value = NULL)
   25.                               └─lifecycle::deprecate_soft(...)
   26.                                 └─lifecycle::deprecate_warn(...)
   27.                                   └─lifecycle::deprecate_stop(when, what, with = with, details = details)
  
  ── ERROR (test-calc_km_pi.R:15:1): (code run outside of `test_that()`) ─────────
  Error: The `value` argument of ``names<-`()` can't be NULL as of tibble 3.0.0.
  `names` must not be `NULL`.
  Backtrace:
       █
    1. └─survParamSim::calc_km_pi(sim, group = "sex") test-calc_km_pi.R:15:0
    2.   └─`%>%`(...)
    3.     ├─base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
    4.     └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
    5.       └─base::eval(quote(`_fseq`(`_lhs`)), env, env)
    6.         └─survParamSim:::`_fseq`(`_lhs`)
    7.           └─magrittr::freduce(value, `_function_list`)
    8.             ├─base::withVisible(function_list[[k]](value))
    9.             └─function_list[[k]](value)
   10.               ├─dplyr::group_by(., rep, !!!trt.syms, !!!group.syms)
   11.               └─dplyr:::group_by.data.frame(., rep, !!!trt.syms, !!!group.syms)
   12.                 └─dplyr::grouped_df(groups$data, groups$group_names, .drop)
   13.                   └─dplyr:::compute_groups(data, vars, drop = drop)
   14.                     └─dplyr:::vec_split_id_order(group_vars)
   15.                       ├─vctrs::vec_slice(split_id, vec_order(split_id$key))
   16.                       └─vctrs::vec_order(split_id$key)
   17.                         └─vctrs:::order_proxy(...)
   18.                           ├─vctrs:::map(...)
   19.                           │ └─base::lapply(.x, .f, ...)
   20.                           └─base::unname(proxy)
   21.                             ├─base::`names<-`(`*tmp*`, value = NULL)
   22.                             └─tibble:::`names<-.tbl_df`(`*tmp*`, value = NULL)
   23.                               └─lifecycle::deprecate_soft(...)
   24.                                 └─lifecycle::deprecate_warn(...)
   25.                                   └─lifecycle::deprecate_stop(when, what, with = with, details = details)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  ERROR (test-calc_hr_pi.R:89:3): check HR calculation
  ERROR (test-calc_hr_pi.R:101:3): check TRT levels assignment
  ERROR (test-calc_km_pi.R:15:1): (code run outside of `test_that()`)
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 16 ]
  Error: Test failures
  Execution halted