ungroup rowwise in .merge_betas and .merge_sigmas (c92d94fa) · Commits · github_fork / Presto 20250701

R/glmm_internal.R

+3 −1

Original line number	Diff line number	Diff line
		@@ -43,6 +43,7 @@
		dplyr::full_join(X1, X2, by = terms_join) %>%
		dplyr::rowwise() %>%
		dplyr::mutate(beta = sum(beta.x, beta.y, na.rm = TRUE)) %>%
		dplyr::ungroup() %>%
		dplyr::select(-beta.x, -beta.y)
		})
		}
		@@ -54,6 +55,7 @@
		dplyr::full_join(X1, X2, by = terms_join) %>%
		dplyr::rowwise() %>%
		dplyr::mutate(sigma = sqrt(sum(sigma.x ^ 2, sigma.y ^ 2, na.rm = TRUE))) %>%
		dplyr::ungroup() %>%
		dplyr::select(-sigma.x, -sigma.y)
		})
		}