From f49b437825396593f389ab953975d82b96535153 Mon Sep 17 00:00:00 2001
From: Jannik <orzek@mpib-berlin.mpg.de>
Date: Thu, 24 Aug 2023 23:19:59 +0200
Subject: [PATCH] removing means

---
 R/mxsem.R | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/R/mxsem.R b/R/mxsem.R
index 868081f..c6ee73f 100644
--- 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{