Update get_marginalcontrasts.R

easystats · Feb 21, 2025 · 94accfe · 94accfe
1 parent 2456c88
commit 94accfe
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/get_marginalcontrasts.R b/R/get_marginalcontrasts.R
@@ -274,7 +274,7 @@ get_marginalcontrasts <- function(model,
   # for `estimate = "average"`, we cannot create a data grid, thus we need to
   # filter manually. However, for all other `estimate` options, we can simply
   # use the data grid for filtering
-  if (!identical(estimate, "average")) {
+  if (!identical(estimate, "average") && !is.null(original_by)) {
     my_args$by <- original_by
     by_filter <- NULL
   } else if (!is.null(by_token)) {