Fixed : names weren't assigned to IMLEGIT outputs

AlexiaJM · May 11, 2017 · 0a1e9ef · 0a1e9ef
1 parent a237447
commit 0a1e9ef
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/LEGIT.R b/R/LEGIT.R
@@ -896,6 +896,7 @@ IMLEGIT = function(data, latent_var, formula, start_latent_var=NULL, eps=.001, m
 	formula_withlatent_var  = vector("list", k)
 	formula_step  = vector("list", k)
 	fit_ = vector("list", k)
+	names(fit_) = names(latent_var)
 
 	# Deconstructing formula into parts (With latent_var and without latent_var)
 	formula_full = stats::terms(formula,simplify=TRUE)