From 17fb2cb46c386084e5004a46f110f21368ce10dc Mon Sep 17 00:00:00 2001 From: HelenaLC Date: Thu, 27 Jun 2024 11:33:44 +0200 Subject: [PATCH] relax unit tests --- tests/testthat/test_plotDiffHeatmap.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/testthat/test_plotDiffHeatmap.R b/tests/testthat/test_plotDiffHeatmap.R index e820a54..1ace66c 100644 --- a/tests/testthat/test_plotDiffHeatmap.R +++ b/tests/testthat/test_plotDiffHeatmap.R @@ -33,7 +33,7 @@ test_that("plotDiffHeatmap() - DA", { y <- p@matrix expect_gte(min(y), 0) expect_lte(max(y), 1) - expect_true(all(colSums(y) == 1)) + expect_equivalent(colSums(y), rep(1, ncol(y))) expect_equal(dim(y), c(nlevels(kids), nlevels(x$sample_id))) expect_identical(rownames(y), levels(kids)) expect_identical(colnames(y), levels(x$sample_id))