来自图书《MPlus中介调节模型》
USEVARIABLES = X W Y XW;
CATEGORICAL = Y;
DEFINE:
XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
MODEL:
[Y$1] (b0);
Y ON X (b1);
Y ON W (b2);
Y ON XW (b3);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W OR_LO OR_MED OR_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
OR_LO = exp(b1 + b3*LOW_W);
OR_MED = exp(b1 + b3*MED_W);
OR_HI = exp(b1 + b3*HIGH_W);
USEVARIABLES = X W Y XW;
CATEGORICAL = Y;
DEFINE:
XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
MODEL:
[Y$1] (b0);
Y ON X (b1);
Y ON W (b2);
Y ON XW (b3);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W OR_LO OR_MED OR_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
OR_LO = exp(b1 + b3*LOW_W);
OR_MED = exp(b1 + b3*MED_W);
OR_HI = exp(b1 + b3*HIGH_W);
PLOT(PLOMOD PMEDMOD PHIMOD);
USEVARIABLES = X W Y XW;
CATEGORICAL = Y;
DEFINE:
XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
MODEL:
[Y$1] (b0);
Y ON X (b1);
Y ON W (b2);
Y ON XW (b3);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W OR_LO OR_MED OR_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
OR_LO = exp(b1 + b3*LOW_W);
OR_MED = exp(b1 + b3*MED_W);
OR_HI = exp(b1 + b3*HIGH_W);
PLOT(PLOMOD PMEDMOD PHIMOD);
LOOP(XVAL,1,5,0.1);
PLOMOD = 1/(1 + exp(-1*((b0 + b2*LOW_W) + (b1 + b3*LOW_W)*XVAL)));
PMEDMOD = 1/(1 + exp(-1*((b0 + b2*MED_W) + (b1 + b3*MED_W)*XVAL)));
PHIMOD = 1/(1 + exp(-1*((b0 + b2*HIGH_W) + (b1 + b3*HIGH_W)*XVAL)));
USEVARIABLES = X W Y XW;
CATEGORICAL = Y;
DEFINE:
XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
MODEL:
[Y$1] (b0);
Y ON X (b1);
Y ON W (b2);
Y ON XW (b3);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W OR_LO OR_MED OR_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
OR_LO = exp(b1 + b3*LOW_W);
OR_MED = exp(b1 + b3*MED_W);
OR_HI = exp(b1 + b3*HIGH_W);
PLOT(PLOMOD PMEDMOD PHIMOD);
LOOP(XVAL,1,5,0.1);
PLOMOD = 1/(1 + exp(-1*((b0 + b2*LOW_W) + (b1 + b3*LOW_W)*XVAL)));
PMEDMOD = 1/(1 + exp(-1*((b0 + b2*MED_W) + (b1 + b3*MED_W)*XVAL)));
PHIMOD = 1/(1 + exp(-1*((b0 + b2*HIGH_W) + (b1 + b3*HIGH_W)*XVAL)));
PLOT: TYPE = plot2;
USEVARIABLES = X W Y XW;
CATEGORICAL = Y;
DEFINE:
XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
MODEL:
[Y$1] (b0);
Y ON X (b1);
Y ON W (b2);
Y ON XW (b3);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W OR_LO OR_MED OR_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
OR_LO = exp(b1 + b3*LOW_W);
OR_MED = exp(b1 + b3*MED_W);
OR_HI = exp(b1 + b3*HIGH_W);
PLOT(PLOMOD PMEDMOD PHIMOD);
LOOP(XVAL,1,5,0.1);
PLOMOD = 1/(1 + exp(-1*((b0 + b2*LOW_W) + (b1 + b3*LOW_W)*XVAL)));
PMEDMOD = 1/(1 + exp(-1*((b0 + b2*MED_W) + (b1 + b3*MED_W)*XVAL)));
PHIMOD = 1/(1 + exp(-1*((b0 + b2*HIGH_W) + (b1 + b3*HIGH_W)*XVAL)));
PLOT: TYPE = plot2;
OUTPUT: STAND;