Better use of try

HectorRDB · Oct 5, 2022 · e94b5a3 · e94b5a3
1 parent 4895cfc
commit e94b5a3
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/testthat/test_tscan.R b/tests/testthat/test_tscan.R
@@ -1,7 +1,7 @@
 library(testthat)
 library(slingshot)
 library(SingleCellExperiment)
-library(TSCAN)
+# library(TSCAN)
 
 data(list = 'slingshotExample', package = "slingshot")
 if (!"cl" %in% ls()) {
@@ -11,7 +11,7 @@ if (!"cl" %in% ls()) {
 condition <- factor(rep(c('A','B'), length.out = nrow(rd)))
 condition[110:139] <- 'A'
 mst <- createClusterMST(rd, cl)
-mapping <- try(mapCellsToEdges(rd, mst, cl))
+mapping <- try(mapCellsToEdges(rd, mst, cl),silent = T)
 if (class(mapping) != "try-error") {
   ordering <- pathStat(orderCells(mapping, mst, start = 1))