TITLE:
Eq 9.3: Multivariate Longitudinal Model using SEM Syntax
Across-Variable Relationships via Covariances
DATA:
FILE = MPLUS_Chapter9.csv;
FORMAT = FREE;
DATA LONGTOWIDE:
LONG = agec18 | risky | mon3;
WIDE = age12-age18 | risky12-risky18 | mon12-mon18;
IDVARIABLE = PersonID;
REPETITION = occasion (12-18);
VARIABLE:
NAMES = PersonID att12 PMmon copymon18 occasion age risky monitor agec18 att4
mon3 PMmon3 WPmon A18mon3 Ch18mon;
USEVARIABLES = att4 age12-age18 risky12-risky18 mon12-mon18;
MISSING = ALL (-9999);
TSCORES = age12-age18;
ANALYSIS:
ESTIMATOR = ML;
PROCESSORS = 4;
TYPE = RANDOM;
MODEL:
Rint Rlin Rquad | risky12-risky18 AT age12-age18;
Mint Mlin | mon12-mon18 AT age12-age18;
[risky12-risky18@0 mon12-mon18@0];
risky12-risky18 (Rresvar);
mon12-mon18 (Mresvar);
risky12-risky18 PWITH mon12-mon18 (RresMres);
[Rint Mint Rlin Mlin Rquad] (bRint bMint bRlin bMlin bRquad);
Rint Mint Rlin Mlin Rquad@0 (Rintvar Mintvar Rlinvar Mlinvar Rquadvar);
Rint WITH Rlin (RintRlin);
Mint WITH Mlin (MintMlin);
Rint WITH Mint (RintMint);
Rlin WITH Mlin (RlinMlin);
Rint WITH Mlin (RintMlin);
Rlin WITH Mint (RlinMint);
Rint Rlin ON att4 (battRint battRlin);
MODEL CONSTRAINT:
NEW(WPresc BPintc BPlinc BPRIRLc BPMIMLc BPRIMLc BPRLMIc);
WPresc = RresMres / (SQRT(Rresvar)*SQRT(Mresvar));
BPintc = RintMint / (SQRT(Rintvar)*SQRT(Mintvar));
BPlinc = RlinMlin / (SQRT(Rlinvar)*SQRT(Mlinvar));
BPRIRLc = RintRlin / (SQRT(Rintvar)*SQRT(Rlinvar));
BPMIMLc = MintMlin / (SQRT(Mintvar)*SQRT(Mlinvar));
BPRIMLc = RintMlin / (SQRT(Rintvar)*SQRT(Mlinvar));
BPRLMIc = RlinMint / (SQRT(Rlinvar)*SQRT(Mintvar));