Issue with the summary function

There is a bug in the summary function.

library(lavaan)
modelpop = '
eta1 =~ 1*x1 + 1.25*x2+1.5*x3
x1~~1.5*x1;x2~~2*x2;x3~~2.5*x3

eta1~~2*eta1

eta2 =~ 1*x4 + 1.25*x5+1.5*x6
x4~~1.5*x4;x5~~2*x5;x6~~2.5*x6

eta2~~2*eta2

eta3 =~ 1*x7 + 1.25*x8+1.5*x9
x7~~1.5*x7;x8~~2*x8;x9~~2.5*x9

eta1~~1.2*eta2
eta3~0*eta1+0.7*eta2

eta3~~1*eta3
'

dat=simulateData(model = modelpop,empirical = T )

model='
eta1=~x1 + x2 + x3
eta2=~x4 + x5 + x6

eta3=~x7 + x8 + x9

eta3~eta1+eta2
'

out1mat=matrixpls(S = cov(dat),model = model,standardize = F,outerEstim = outerEstim.modeB)
summary(out1mat)

It appear if standardize is set to FALSE. In case of TRUE it works.

mronkko / matrixpls

Issue with the summary function #9