| ... | ... |
@@ -34,7 +34,7 @@ test_that("Graph is generated", {
|
| 34 | 34 |
) |
| 35 | 35 |
expect_is(g2, "igraph") |
| 36 | 36 |
|
| 37 |
- res_pos_z <- res_enrich_withscores[res_enrich_withscores$z_score >= 0, ] |
|
| 37 |
+ res_pos_z <- na.omit(res_enrich_withscores[res_enrich_withscores$z_score >= 0, ]) |
|
| 38 | 38 |
g3 <- enrichment_map( |
| 39 | 39 |
res_enrich = res_pos_z, |
| 40 | 40 |
res_de = res_macrophage_IFNg_vs_naive, |
