From 552e1f378040e6080aa3ac13a7f8a302e579532d Mon Sep 17 00:00:00 2001 From: gabrielodom Date: Wed, 28 Jun 2023 13:29:22 -0400 Subject: [PATCH] Attempting to get pathwayPCA green on Bioconductor --- tests/testthat/test_SE2Tidy.R | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/tests/testthat/test_SE2Tidy.R b/tests/testthat/test_SE2Tidy.R index 79f41d6..36eeb22 100644 --- a/tests/testthat/test_SE2Tidy.R +++ b/tests/testthat/test_SE2Tidy.R @@ -6,8 +6,9 @@ data(airway, package = "airway") airway_df <- SE2Tidy(airway) test_that("SE2Tidy transforms data correctly", { - + expect_s3_class(airway_df, "data.frame") - expect_equal(dim(airway_df), c(8, 64112)) - + # expect_equal(dim(airway_df), c(8, 64112)) + expect_equal(dim(airway_df), c(8, 63687)) + })