diff --git a/tests/testthat/_snaps/equivalence_test.md b/tests/testthat/_snaps/equivalence_test.md new file mode 100644 index 000000000..8e54d8ac0 --- /dev/null +++ b/tests/testthat/_snaps/equivalence_test.md @@ -0,0 +1,36 @@ +# equivalence test + + Code + print(out) + Output + # Test for Practical Equivalence + + ROPE: [-0.18 0.18] + + Parameter | H0 | inside ROPE | 95% HDI + ----------------------------------------------------- + (Intercept) | Rejected | 0.00 % | [-2.68, -0.50] + size | Accepted | 100.00 % | [-0.04, 0.07] + period2 | Rejected | 0.00 % | [-1.61, -0.36] + period3 | Rejected | 0.00 % | [-1.77, -0.40] + period4 | Rejected | 0.00 % | [-2.52, -0.76] + + + +--- + + Code + print(out) + Output + # Test for Practical Equivalence + + Parameter | H0 | inside ROPE | 95% HDI | ROPE + ---------------------------------------------------------------------- + (Intercept) | Undecided | 15.82 % | [-2.68, -0.50] | [-1.00, 1.00] + size | Accepted | 100.00 % | [-0.04, 0.07] | [-0.10, 0.10] + period2 | Rejected | 0.00 % | [-1.61, -0.36] | [0.00, 2.00] + period3 | Accepted | 100.00 % | [-1.77, -0.40] | [-2.00, 0.00] + period4 | Rejected | 0.00 % | [-2.52, -0.76] | [-0.10, 0.10] + + + diff --git a/tests/testthat/test-equivalence_test.R b/tests/testthat/test-equivalence_test.R index 632e58807..bf0f83706 100644 --- a/tests/testthat/test-equivalence_test.R +++ b/tests/testthat/test-equivalence_test.R @@ -1,6 +1,6 @@ test_that("equivalence test", { skip_if_offline() - skip_if_not_or_load_if_installed("rstanarm") + # skip_if_not_or_load_if_installed("rstanarm") m <- insight::download_model("stanreg_merMod_5") out <- equivalence_test(m, verbose = FALSE)