#### simulate data ####
m <- lvm(Y~X1+X2)
set.seed(10)
d <- lava::sim(m, 2e1)
#### latent variable models ####
e.lvm <- estimate(m, data = d)
summary(e.lvm)$coef
summary2(e.lvm)
summary2(e.lvm, ssc = "none")
Run the code above in your browser using DataLab