Added more flexibility in the msqrobLM function for models with missi…

…ng variables
statOmics · Oct 28, 2024 · c1fa7a2 · c1fa7a2
1 parent 6cf8990
commit c1fa7a2
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/msqrob.R b/R/msqrob.R
@@ -116,7 +116,7 @@ msqrobLm <- function(y,
                     vcovUnscaled[names(mod$coef), names(mod$coef)] <- msqrob2:::.vcovUnscaled(mod)
 
                     model <- list(
-                        coefficients = mod$coef,
+                        coefficients = coef,
                         vcovUnscaled = .vcovUnscaled(mod),
                         sigma = sigma,
                         df.residual = df.residual,