From 7710bbb6d55187deafa3d335d92fc61ec5d2cf1e Mon Sep 17 00:00:00 2001 From: wlandau Date: Fri, 28 Jun 2024 12:34:23 -0400 Subject: [PATCH] suppess a superfluous message --- R/brm_archetype.R | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/R/brm_archetype.R b/R/brm_archetype.R index b59db3e1..68a89b1d 100644 --- a/R/brm_archetype.R +++ b/R/brm_archetype.R @@ -166,7 +166,12 @@ brm_archetype_attributes <- function(data) { #' @export summary.brms_mmrm_archetype <- function(object, ...) { formula <- brm_formula(object) - transform <- brm_transform_marginal(object, formula, prefix = "") + transform <- brm_transform_marginal( + object, + formula, + average_within_subgroup = FALSE, + prefix = "" + ) transform <- transform[, attr(object, "brm_archetype_interest")] marginals <- gsub(brm_sep(), ":", rownames(transform), fixed = TRUE) lines <- c(