20231117 - fixes

isaactpetersen · Nov 17, 2023 · 0aa2b14 · 0aa2b14
1 parent 1af8596
commit 0aa2b14
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/08-Structural-Equation-Modeling.Rmd b/08-Structural-Equation-Modeling.Rmd
@@ -691,7 +691,7 @@ formativeModel4_syntax <- '
   w4 := -((l12)*((l23)*((l34)))) / ((l11)*((1)*((1)*((1)))) + -(l21)*((l12)*((1)*((1)))) + (1)*((l12)*((l23)*((1)))) + -(l41)*((l12)*((l23)*((l34)))))
   
   # Calculate the variances
-  varv1 := ((1) * (varformative)) * (1) + ((l11) * (varnu1)) * (l11)
+  varv1 := ((l11) * (varformative)) * (l11) + ((l12) * (varnu1)) * (l12)
   varv2 := ((l21) * (varformative)) * (l21) + ((1) * (varnu1) + (l23) * (cov12)) * (1) + ((1) * (cov12) + (l23) * (varnu2)) * (l23)
   varv3 := ((1) * (varformative)) * (1) + ((1) * (varnu2) + (l34) * (cov23)) * (1) + ((1) * (cov23) + (l34) * (varnu3)) * (l34)
   varv4 := ((l41) * (varformative)) * (l41) + ((1) * (varnu3)) * (1)