Modelagem de Equações Estruturais com lavaan em R
Erin Buchanan
Professor
library(lavaan)
library(semPlot)
twofactor.model <- 'text =~ x4 + x5 + x6
speed =~ x7 + x8 + x9'
twofactor.fit <- cfa(model = twofactor.model,
data = HolzingerSwineford1939)
semPaths(object = twofactor.fit)

semPaths(object = twofactor.fit,
whatLabels = "std",
edge.label.cex = 1)
#whatLabels também pode ser "par"

semPaths(object = twofactor.fit,
whatLabels = "std",
edge.label.cex = 1,
layout = "circle")
#opções de layout: tree, circle, spring, tree2, circle2

semPaths(object = twofactor.fit,
whatLabels = "std",
edge.label.cex = 1,
layout = "tree", rotation = 2)
#opções de rotation são 1, 2, 3, 4 para layouts tree

semPaths(object = twofactor.fit,
whatLabels = "std",
edge.label.cex = 1,
layout = "tree", rotation = 2,
what = "std", edge.color = "purple")
#opções de what incluem par e std

Modelagem de Equações Estruturais com lavaan em R