\begin{Schunk}
\begin{Sinput}
 ## Estimating cfa.01.v.02
 ## cfa.01.v.02.fit.fiml <- 
 ## cfa(model = cfa.01.v.02, data = depre_i_miss,
 ##     mimic = "Mplus", estimator = "WLSMV",
 ##     missing = "ml", meanstructure = TRUE,
 ##     ordered = c("depre1_i", "depre2_i",
 ##                 "depre3_i", "depre4_i",
 ##                 "depre5_i", "depre6_i"))
\end{Sinput}
\end{Schunk}
