As per your suggestions I ran the script but could not get the result, then I applied previous code. I am providing the script and result here:
Model.1<- '
# INTERCEPT AND SLOPE EQUATIONS
i=~ 1*Neuro1+ 1*Neuro2+ 1*Neuro3+ 1*Neuro4+ 1*Neuro5+ 1*Neuro6
s1=~ 0*Neuro1+ 1*Neuro2+ 2*Neuro3+ 3*Neuro4+ 4*Neuro5+ 5*Neuro6
s2=~ 0*Neuro1+ 1*Neuro2+ 4*Neuro3+ 9*Neuro4+ 16*Neuro5+ 25*Neuro6
# REGRESSSION EQUATION OF FACTORS ON INTERCEPT AND SLOPE
i~ Sex+ Edu+ Income+ Locality+ Family+ Mstatus+ CD4C+ BDI+ MMSE
s1~ Sex+ Edu+ Income+ Locality+ Family+ Mstatus+ CD4C+ BDI+ MMSE
s2~ Sex + Edu+ Income+ Locality+ Family+ Mstatus+ CD4C+ BDI+ MMSE
Neuro1 ~~ v1*Neuro1
Neuro2 ~~ v1*Neuro2
Neuro3 ~~ v1*Neuro3
Neuro4 ~~ v1*Neuro4
Neuro5 ~~ v1*Neuro5
Neuro6 ~~ v1*Neuro6
i~~0*s1
i~~0*s2
s1~~0*s1
s1~~0*s2
s2~~0*s2 '
fit.1<- growth(Model.1, data=ExcelW, missing="ml")
37.912
Neuro2 25.750 37.912
Neuro3 25.086 25.888 37.730
Neuro4 24.127 25.055 25.233 36.456
Neuro5 22.873 23.620 23.777 23.343 34.112
Neuro6 21.325 21.584 21.568 21.274 20.705 31.652
I am currently using R version 2.15.0 with lavaan 0.5-11.
On Tuesday, 27 November 2012 12:33:19 UTC+5:30, Kamal Kishore wrote: