0 Lavaan: retroalimentación de modelos complejos sobre la sintaxis

pregunta creada en Thu, Mar 28, 2019 12:00 AM

Estoy tratando de averiguar cómo escribir la sintaxis en Lavaan con R del modelo a continuación. Estoy siguiendo el libro de Beaujean, pero los ejemplos que reporta son muy simples y no estoy seguro de que el mío sea correcto.

https://ibb.co/YfYYJYX #aquí está el modelo

Mi objetivo es hacer un modelo de ecuación estructural con datos de una encuesta simple. Tengo 3 mediadores, 4 variables independientes y un resultado. Todas las variables (excepto el resultado) se miden con una escala de Likert (1-7). X1 es el resultado de item1, item2, item3, item4 por ejemplo. El resultado (Y) es un porcentaje de consumo, rango entre 10 y 100. Por lo tanto, la variable de resultado no se manifiesta por otras variables.

¿Es la sintaxis del modelo que me gustaría tener correcta? (por ejemplo, ¿debo escribir los efectos indirectos como lo hice? ¿Debo agregar covarianza?) ¿Cómo puedo agregar errores en las semPaths? ¿Es esta advertencia algo que debería preocuparme: "ADVERTENCIA de lavaan: algunas variaciones estimadas de ov son negativas"?

¡Gracias!

#variables specification 
mod <-
' 
X1 =~ v1 + va2 + v3 + v4
M1 =~ v5+ v6+ v7+ v8 +v9
M2 =~  v10 + v11 + v13
X2 =~ v14 + v15 +   v16
X3 =~ v17 + v18 + v19
X4 =~   v21 +   v20 
M3 =~ v22 + v23 + v24 + v25 + v26 
Y =~ y
y ~~ 0*y

#model
M1 ~ a1*X1
M2 ~ a2*X2 + a3*X3 
M3 ~ b2*M2 
Y ~ c1*M3 + c2*X4

#indirect effect
Ind1 := a1*b1*b2*c1
Ind2 := a2*b2* c1
Ind3 := a3 *b2*c1

#total effect
Tot := (a1*b1*b2*c1) + (a2*b2* c1) + (a3 *b2*c1)
'
fit <-lavaan::sem(mod, data=data, std.lv=TRUE, orthogonal=TRUE)
summary(fit, fit.measures= TRUE, standardized = TRUE) 

    
0
0 Respuestas                              0                         
fuente colocada aquí