# NOT RUN {
require(umx); data(demoOneFactor)
# raw but no means
m1 <- mxModel("label_ex", mxData(demoOneFactor, type = "raw"), type="RAM",
manifestVars = "x1", latentVars= "G",
umxPath("G", to = "x1"),
umxPath(var = "x1"),
umxPath(var = "G", fixedAt = 1)
)
xmuLabel_RAM_Model(m1)
# }
Run the code above in your browser using DataLab