Increase tolerance in normalization test (for M1)

fmicompbio · Apr 29, 2024 · f88bb53 · f88bb53
1 parent a843e24
commit f88bb53
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/tests/testthat/test-doNormalization.R b/tests/testthat/test-doNormalization.R
@@ -91,7 +91,7 @@ test_that("normalization works", {
                                                       "normalizedAssay"))) == 507)
     expect_equal(apply(assay(normout, "normalizedAssay"), 2, mean,
                        na.rm = TRUE), rep(0L, ncol(normout)),
-                 ignore_attr = TRUE)
+                 ignore_attr = TRUE, tolerance = 1e-5)
 
     ## div.mean
     normout <- doNormalization(sce = sce_mq_preimputation,
@@ -188,7 +188,7 @@ test_that("normalization works", {
                                                       "normalizedAssay"))) == 507)
     expect_equal(apply(assay(normout, "normalizedAssay"), 2, mean,
                        na.rm = TRUE), rep(0L, ncol(normout)),
-                 ignore_attr = TRUE)
+                 ignore_attr = TRUE, tolerance = 1e-5)
 
     ## spike-in features, center.median
     spikes <- rownames(sce_mq_preimputation)[c(8, 90, 123)]