# NOT RUN {
data("empathy")
df <- empathy[1:6]
mx_growth_mixture(model = "i =~ 1*ec1 + 1*ec2 + 1*ec3 +1*ec4 +1*ec5 +1*ec6
s =~ 0*ec1 + 1*ec2 + 2*ec3 +3*ec4 +4*ec5 +5*ec6
ec1 ~~ vec1*ec1
ec2 ~~ vec2*ec2
ec3 ~~ vec3*ec3
ec4 ~~ vec4*ec4
ec5 ~~ vec5*ec5
ec6 ~~ vec6*ec6
i ~~ 0*i
s ~~ 0*s
i ~~ 0*s",
classes = 2,
data = df) -> res
# }
Run the code above in your browser using DataLab