removing means

jhorzek · Aug 24, 2023 · f49b437 · f49b437
1 parent 296b3a4
commit f49b437
Showing 1 changed file with 0 additions and 4 deletions.
diff --git a/R/mxsem.R b/R/mxsem.R
@@ -315,10 +315,6 @@ mxsem <- function(model,
   }else{
     if(!add_intercepts){
       mx_data <- OpenMx::mxData(observed = stats::cov(as.matrix(data[,parameter_table$variables$manifests])),
-                                means = apply(as.matrix(data[,parameter_table$variables$manifests]),
-                                              2,
-                                              mean,
-                                              na.rm = TRUE),
                                 type = "cov",
                                 numObs = nrow(data))
     }else{