Running ‘testthat-active_snw.R’ [24s/38s]
  Running ‘testthat-clustering.R’ [5s/9s]
  Running ‘testthat-comparison.R’ [3s/5s]
  Running ‘testthat-core.R’ [2s/4s]
  Running ‘testthat-data_generation.R’ [3s/5s]
  Running ‘testthat-enrichment.R’ [25s/39s]
  Running ‘testthat-scoring.R’ [3s/6s]
  Running ‘testthat-utility.R’ [17s/25s]
  Running ‘testthat-visualization.R’ [4s/5s]
  Running ‘testthat-zzz.R’ [2s/4s]
Running the tests in ‘tests/testthat-enrichment.R’ failed.
Complete output:
  > library(testthat)
  > library(pathfindR)
  Loading required package: pathfindR.data
  ##############################################################################
                          Welcome to pathfindR!
  
  Please cite the article below if you use pathfindR in published reseach:
  
  Ulgen E, Ozisik O, Sezerman OU. 2019. pathfindR: An R Package for Comprehensive
  Identification of Enriched Pathways in Omics Data Through Active Subnetworks.
  Front. Genet. doi:10.3389/fgene.2019.00858
  
  ##############################################################################
  > 
  > test_check("pathfindR", filter = "enrichment")
  [ FAIL 5 | WARN 0 | SKIP 0 | PASS 36 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-enrichment.R:123:5'): `enrichment_analyses()` -- returns a data frame ──
  enr_res1 <- ... inherits from `'NULL'` not `'character'`.
  ── Failure ('test-enrichment.R:127:5'): `enrichment_analyses()` -- returns a data frame ──
  nrow(enr_res1) <= total is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Failure ('test-enrichment.R:130:5'): `enrichment_analyses()` -- returns a data frame ──
  enr_res2 <- ... inherits from `'NULL'` not `'character'`.
  ── Failure ('test-enrichment.R:132:5'): `enrichment_analyses()` -- returns a data frame ──
  ncol(enr_res2) == ncol(enr_res1) + 1 is not TRUE
  
  `actual`:       
  `expected`: TRUE
  ── Error ('test-enrichment.R:143:9'): `summarize_enrichment_results()` -- returns summarized enrichment results ──
  Error in `summarize_enrichment_results(enrichment_res = combined_res[, 
      -6])`: `enrichment_res` should be a data frame
  Backtrace:
      ▆
   1. ├─testthat::expect_is(...) at test-enrichment.R:143:9
   2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
   3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
   4. └─pathfindR::summarize_enrichment_results(...)
  
  [ FAIL 5 | WARN 0 | SKIP 0 | PASS 36 ]
  Error: Test failures
  Execution halted