Update test-marginaleffects.R

easystats · May 16, 2024 · 820c738 · 820c738
1 parent 1df8a65
commit 820c738
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/tests/testthat/test-marginaleffects.R b/tests/testthat/test-marginaleffects.R
@@ -7,7 +7,7 @@ test_that("marginaleffects", {
 
   x <- marginaleffects::slopes(m,
     variables = "Petal.Length",
-    newdata = insight::get_datagrid(m, at = "Species")
+    newdata = insight::get_datagrid(m, by = "Species")
   )
   # Equivalent in emmeans
   x2 <- emmeans::emtrends(m, var = "Petal.Length", specs = ~ Species + Petal.Length)
@@ -35,8 +35,8 @@ test_that("marginaleffects", {
     parameters::model_parameters(x),
     c(
       "rowid", "Parameter", "Coefficient", "SE", "Statistic", "p",
-      "S", "CI", "CI_low", "CI_high", "predicted_lo", "predicted_hi",
-      "Predicted", "Species", "Petal.Length", "Sepal.Width"
+      "S", "CI", "CI_low", "CI_high", "Predicted", "Species",
+      "Petal.Length", "Sepal.Width"
     )
   )
 })