From 01ab10d08ea7155d37d9588219aec68f944ba2c5 Mon Sep 17 00:00:00 2001 From: Chao Cheng Date: Tue, 27 Aug 2024 16:52:01 +0800 Subject: [PATCH] Fix a typo --- R/utils.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/utils.R b/R/utils.R index 701943b..1378abe 100644 --- a/R/utils.R +++ b/R/utils.R @@ -1025,8 +1025,8 @@ Logistic_FARMM_Path_Further_Improve <- function(x_mat, y_vec, rand_eff_df, h, k_ control = custom_glmer_control ) - dummy_rand_eff_std <- lme4::VarCorr(glmdummyfitfit) - dummy_rand_eff_est <- lme4::ranef(glmdummyfitfit)[[1]] %>% # `ranef()` returns a list + dummy_rand_eff_std <- lme4::VarCorr(glmdummyfit) + dummy_rand_eff_est <- lme4::ranef(glmdummyfit)[[1]] %>% # `ranef()` returns a list tibble::rownames_to_column(var = "subj_vec_fct") %>% tibble::remove_rownames() %>% dplyr::mutate(subj_vec_fct = as.factor(subj_vec_fct),