From d0668237cba9d65fc49e3ccfc241e631764f041e Mon Sep 17 00:00:00 2001
From: HediaTnani <hediatnani0@gmail.com>
Date: Tue, 16 Jan 2024 12:11:49 -0500
Subject: [PATCH] Update the unit test output is a ggplot

---
 tests/testthat/test-DEqual.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/testthat/test-DEqual.R b/tests/testthat/test-DEqual.R
index 5ead71d..3cb4f04 100644
--- a/tests/testthat/test-DEqual.R
+++ b/tests/testthat/test-DEqual.R
@@ -24,7 +24,7 @@ test_that("DE does not have column 't'", {
 
 # Test that the output is a ggplot object
 test_that("output is a ggplot", {
-    expect_equal(class(DEqual(random_de)), c("ggplot","gg"))
+    expect_equal(class(DEqual(random_de)), c("gg",      "ggplot"))
 })
 
 # Test for rownames starting with "ENST"