umx_fix_latents(model, latents = NULL, exogenous.only = TRUE, at = 1)
mxModel
to setmxModel
umxDiagnose
,
umxLabel
, umxLatent
,
umxMatrix
, umxModify
,
umxPath
, umxRAM2Ordinal
,
umxRAM
, umxRun
,
umxThresholdMatrix
,
umxValues
,
umx_fix_first_loadings
, umx
require(umx)
data(demoOneFactor)
m1 <- mxModel("One Factor", type = "RAM",
manifestVars = names(demoOneFactor),
latentVars = "g",
mxPath(from = "g", to = names(demoOneFactor)),
mxPath(from = names(demoOneFactor), arrows = 2),
mxData(cov(demoOneFactor), type = "cov", numObs = 500)
)
umx_show(m1, matrices = "S") # variance of g is not set
m1 = umx_fix_latents(m1)
umx_show(m1, matrices = "S") # variance of g is fixed at 1
Run the code above in your browser using DataLab