Running 'testthat.R' [158s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(diceR)
  > 
  > test_check("diceR")
  Selecting k and imputing non-clustered cases
  Computing consensus functions
  Evaluating output with consensus function results
  Diverse Cluster Ensemble Completed
  Selecting k and imputing non-clustered cases
  Selecting k and imputing non-clustered cases
  Computing consensus functions
  Evaluating output with consensus function results
  Diverse Cluster Ensemble Completed
  Selecting k and imputing non-clustered cases
  Computing consensus functions
  Diverse Cluster Ensemble Completed
  Selecting k and imputing non-clustered cases
  Computing consensus functions
  Diverse Cluster Ensemble Completed
  Selecting k and imputing non-clustered cases
  Computing consensus functions
  Diverse Cluster Ensemble Completed
  Selecting k and imputing non-clustered cases
  Computing consensus functions
  Diverse Cluster Ensemble Completed
  == Failed tests ================================================================
  -- Error (test-dice.R:16:3): dice works with multiple algorithms, consensus funs, trimming, and
            reference class --
  Error: cannot allocate vector of size 932 Kb
  Backtrace:
       x
    1. +-diceR::dice(...) test-dice.R:16:2
    2. | \-diceR::consensus_evaluate(...)
    3. |   +-consensus_combine(E, element = "class") %>% purrr::map(as.data.frame)
    4. |   \-diceR::consensus_combine(E, element = "class")
    5. |     \-abind::abind(list(...), along = 3) %>% consensus_summary()
    6. +-purrr::map(., as.data.frame)
    7. +-diceR:::consensus_summary(.)
    8. | \-`%>%`(...)
    9. \-purrr::imap(...)
   10.   \-purrr::map2(.x, vec_index(.x), .f, ...)
   11.     \-diceR:::.f(.x[[1L]], .y[[1L]], ...)
   12.       \-purrr::map(.x, function(z) hc(stats::dist(z), k = .y))
   13.         \-diceR:::.f(.x[[i]], ...)
   14.           \-diceR:::hc(stats::dist(z), k = .y)
   15.             +-stats::cutree(stats::hclust(d, method = method), k)
   16.             | \-base::nrow(tree$merge)
   17.             \-stats::hclust(d, method = method)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 110 ]
  Error: Test failures
  Execution halted