From fbcac8222f827c1fc1eb251136169ac27f3407f5 Mon Sep 17 00:00:00 2001 From: Ben Bolker Date: Mon, 13 Nov 2023 22:32:41 -0700 Subject: [PATCH] fix exponentiate for brms --- R/brms_tidiers.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/brms_tidiers.R b/R/brms_tidiers.R index 3e9d07c..27b8fa3 100644 --- a/R/brms_tidiers.R +++ b/R/brms_tidiers.R @@ -280,7 +280,7 @@ tidy.brmsfit <- function(x, parameters = NA, if (exponentiate) { vv <- c("estimate", "conf.low", "conf.high") out <- (out - %>% mutate(across(contains(vv)), exp) + %>% mutate(across(contains(vv), exp)) %>% mutate(across(std.error, ~ . * estimate)) ) }