Merge pull request #16 from mayer79/plot_tests

Add one test for plot(inter)
ModelOriented · Jul 1, 2023 · 0c4501b · 0c4501b
2 parents 9c55241 + d8e409a
commit 0c4501b
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/tests/testthat/test_interact.R b/tests/testthat/test_interact.R
@@ -41,6 +41,7 @@ test_that("Non-additive models show interactions > 0 (one interaction)", {
 
   expect_s3_class(H2_j(inter), "ggplot")
   expect_s3_class(H2_jk(inter), "ggplot")
+  expect_s3_class(plot(inter), "ggplot")
 })
 
 fit <- lm(