Créer des diagrammes avec semPaths()

Modélisation par équations structurelles avec lavaan en R

Erin Buchanan

Professor

semPlot et semPaths()

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)

Sortie par défaut de semPaths()

Graphique par défaut de semPaths

Modifier l'illustration

semPaths(object = twofactor.fit,
         whatLabels = "std", 
         edge.label.cex = 1)
#whatLabels peut aussi être "par"

Modèle mis à jour avec étiquettes d'arêtes

Disposition de l'illustration

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

Disposition mise à jour : option circle

Rotation de l'illustration

semPaths(object = twofactor.fit,
          whatLabels = "std", 
          edge.label.cex = 1, 
          layout = "tree", rotation = 2)
#options de rotation : 1, 2, 3, 4 pour les layouts tree

Arbre mis à jour : rotation, latents à gauche

Visualisation des couleurs

semPaths(object = twofactor.fit,
         whatLabels = "std", 
         edge.label.cex = 1, 
         layout = "tree", rotation = 2,
         what = "std", edge.color = "purple")
#options pour what : par et std

Couleur mise à jour : violet nuancé

Passons à la pratique !

Modélisation par équations structurelles avec lavaan en R