Running ‘testthat.R’ [120s/129s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(diceR)
  > 
  > test_check("diceR")
  ── 1. Error: trimming (potentially) removes algorithms (@test-consensus_combine.
  Elements of Each Row Must Be Unique
  Backtrace:
   1. diceR::consensus_evaluate(...)
   5. purrr::map(...)
   6. diceR:::.f(.x[[i]], ...)
   7. diceR:::consensus_rank(ii, n)
   8. RankAggreg::RankAggreg(...)
  
  ── 2. Error: reweighing (potentially) replicates each slice of algorithm (@test-
  Elements of Each Row Must Be Unique
  Backtrace:
   1. diceR::consensus_evaluate(...)
   5. purrr::map(...)
   6. diceR:::.f(.x[[i]], ...)
   7. diceR:::consensus_rank(ii, n)
   8. RankAggreg::RankAggreg(...)
  
  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
  Evaluating output with consensus function results
  Diverse Cluster Ensemble Completed
  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
  ── 3. Error: algorithm vs internal index heatmap works (@test-dice.R#52)  ──────
  Elements of Each Row Must Be Unique
  Backtrace:
    1. diceR::dice(...)
    2. diceR:::algii_heatmap(data, k, E, clusters, ref.cl)
    3. tibble::column_to_rownames(., "Algorithms")
   11. magrittr::extract(...)
   15. RankAggreg::RankAggreg(...)
  
  ── 4. Failure: algii_heatmap works when there is more than one k (@test-graphs.R
  `dice(...)` threw an error.
  Message: Elements of Each Row Must Be Unique
  Class:   simpleError/error/condition
  Backtrace:
    1. testthat::expect_error(...)
    6. diceR::dice(...)
    7. diceR:::algii_heatmap(data, k, E, clusters, ref.cl)
    4. tibble::column_to_rownames(., "Algorithms")
   12. magrittr::extract(...)
   20. RankAggreg::RankAggreg(...)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  [ OK: 107 | SKIPPED: 0 | WARNINGS: 97 | FAILED: 4 ]
  1. Error: trimming (potentially) removes algorithms (@test-consensus_combine.R#42) 
  2. Error: reweighing (potentially) replicates each slice of algorithm (@test-consensus_combine.R#52) 
  3. Error: algorithm vs internal index heatmap works (@test-dice.R#52) 
  4. Failure: algii_heatmap works when there is more than one k (@test-graphs.R#48) 
  
  Error: testthat unit tests failed
  Execution halted