I got the same errormsg... Error in t(Delta[[g]]) %*% A1[[g]] : non-conformable arguments
I used the following funciton:
BRD <- 'BRDg =~ S1mean +S2mean + S3mean + S4mean'
fit.BRD <- sem(BRD,
data = data,
estimator = "MLM",
mimic = "Mplus")
fitmeasures(fit.BRD, c("npar", "chisq", "df", "cfi", "rmsea", "srmr"))
Find a small exemplary sample attached.
Thanks,
Jasmin