adjusted tolerance to accept igraph changes

uptake · Nov 11, 2024 · 2de0fd3 · 2de0fd3
1 parent 18acbda
commit 2de0fd3
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/tests/testthat/test-DirectedGraph.R b/tests/testthat/test-DirectedGraph.R
@@ -105,11 +105,12 @@ for (thisTest in testList) {
         reporter <- get(thisTest[['reporter']])$new()$set_package(thisTest[['pkg']])
 
         for (nodeMeas in reporter$pkg_graph$available_node_measures) {
-            expect_equivalent(
+            expect_equal(
                 object = reporter$pkg_graph$node_measures(nodeMeas)
                 , expected = expectedNodeMeasuresDT[, lapply(.SD, function(x) replace(x, is.na(x), NaN)), .SDcols = c('node', nodeMeas)]
                 , ignore.col.order = TRUE
                 , ignore.row.order = TRUE
+                , tolerance = 0.01
                 , info = sprintf("Value testing for %s, %s : %s /n obj: %s /n exp %s"
                                  , thisTest[['pkg']]
                                  , thisTest[['reporter']]