75% coverage

pachadotdev · Jun 18, 2024 · f277de6 · f277de6
1 parent 16c1b84
commit f277de6
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 1 deletion.
diff --git a/tests/testthat/test-apes.R b/tests/testthat/test-apes.R
@@ -4,6 +4,8 @@ test_that("apes works", {
 
   mod <- feglm(trade ~ lang | year, trade_short, family = binomial())
 
+  expect_output(print(mod))
+
   expect_gt(length(coef(apes(mod))), 0)
   expect_gt(length(coef(summary(apes(mod)))), 0)
   expect_gt(length(coef(bias_corr(mod))), 0)

diff --git a/tests/testthat/test-fepoisson.R b/tests/testthat/test-fepoisson.R
@@ -24,9 +24,19 @@ test_that("fepoisson is similar to fixest", {
 
   expect_equal(length(fes), 2)
 
+  smod <- summary(mod)
+
   expect_gt(length(fitted(mod)), 0)
   expect_gt(length(predict(mod)), 0)
   expect_gt(length(coef(mod)), 0)
-  expect_gt(length(coef(summary(mod))), 0)
+  expect_gt(length(coef(smod)), 0)
+
+  expect_output(summary_formula_(smod))
+  expect_output(summary_family_(smod))
+  expect_output(summary_estimates_(smod, 3))
+  expect_output(summary_r2_(smod, 3))
+  expect_output(summary_nobs_(smod))
+  expect_output(summary_fisher_(smod))
+
 })