Merge pull request #101 from jr-leary7/dev

added dependency on R version and updated tests again
jr-leary7 · Jun 19, 2023 · 189bae6 · 189bae6
2 parents a634bb8 + 01358c8
commit 189bae6
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 4 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -13,7 +13,8 @@ LazyData: true
 RoxygenNote: 7.2.1
 Depends: 
   glm2, 
-  magrittr
+  magrittr, 
+  R (>= 3.5.0)
 Imports: 
     geeM,
     MASS,

diff --git a/tests/testthat/test_scLANE.R b/tests/testthat/test_scLANE.R
@@ -166,9 +166,12 @@ test_that("testDynamic() output", {
   expect_s3_class(glm_gene_stats, "scLANE")
   expect_s3_class(gee_gene_stats, "scLANE")
   expect_s3_class(glmm_gene_stats, "scLANE")
-  expect_equal(length(glm_gene_stats), 10)
-  expect_equal(length(gee_gene_stats), 10)
-  expect_equal(length(glmm_gene_stats), 10)
+  expect_length(glm_gene_stats, 10)
+  expect_length(gee_gene_stats, 10)
+  expect_length(glmm_gene_stats, 10)
+  expect_s3_class(glm_gene_stats$ABCF1$Lineage_A$MARGE_Summary, "data.frame")
+  expect_s3_class(gee_gene_stats$ABCF1$Lineage_A$MARGE_Summary, "data.frame")
+  expect_s3_class(glmm_gene_stats$ABCF1$Lineage_A$MARGE_Summary, "data.frame")
   expect_gt(nrow(glm_gene_stats$ABCF1$Lineage_A$MARGE_Summary), 0)
   expect_gt(nrow(gee_gene_stats$ABCF1$Lineage_A$MARGE_Summary), 0)
   expect_gt(nrow(glmm_gene_stats$ABCF1$Lineage_A$MARGE_Summary), 0)