来自图书《MPlus中介调节模型》
USEVARIABLES = X M W Y XW;
DEFINE: XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
BOOTSTRAP = 10000;
MODEL:
[Y] (b0);
Y ON M (b1);
Y ON X (cdash1);
Y ON W (cdash2);
Y ON XW (cdash3);
[M] (a0);
M ON X (a1);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W a1b1 DIR_LO DIR_MED DIR_HI TOT_LO TOT_MED TOT_HI);
USEVARIABLES = X M W Y XW;
DEFINE: XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
BOOTSTRAP = 10000;
MODEL:
[Y] (b0);
Y ON M (b1);
Y ON X (cdash1);
Y ON W (cdash2);
Y ON XW (cdash3);
[M] (a0);
M ON X (a1);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W a1b1 DIR_LO DIR_MED DIR_HI TOT_LO TOT_MED TOT_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
a1b1 = a1*b1;
USEVARIABLES = X M W Y XW;
DEFINE: XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
BOOTSTRAP = 10000;
MODEL:
[Y] (b0);
Y ON M (b1);
Y ON X (cdash1);
Y ON W (cdash2);
Y ON XW (cdash3);
[M] (a0);
M ON X (a1);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W a1b1 DIR_LO DIR_MED DIR_HI TOT_LO TOT_MED TOT_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
a1b1 = a1*b1;
DIR_LO = cdash1 + cdash3*LOW_W;
DIR_MED = cdash1 + cdash3*MED_W;
DIR_HI = cdash1 + cdash3*HIGH_W;
USEVARIABLES = X M W Y XW;
DEFINE: XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
BOOTSTRAP = 10000;
MODEL:
[Y] (b0);
Y ON M (b1);
Y ON X (cdash1);
Y ON W (cdash2);
Y ON XW (cdash3);
[M] (a0);
M ON X (a1);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W a1b1 DIR_LO DIR_MED DIR_HI TOT_LO TOT_MED TOT_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
a1b1 = a1*b1;
DIR_LO = cdash1 + cdash3*LOW_W;
DIR_MED = cdash1 + cdash3*MED_W;
DIR_HI = cdash1 + cdash3*HIGH_W;
TOT_LO = DIR_LO + a1b1;
TOT_MED = DIR_MED + a1b1;
TOT_HI = DIR_HI + a1b1;
USEVARIABLES = X M W Y XW;
DEFINE: XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
BOOTSTRAP = 10000;
MODEL:
[Y] (b0);
Y ON M (b1);
Y ON X (cdash1);
Y ON W (cdash2);
Y ON XW (cdash3);
[M] (a0);
M ON X (a1);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W a1b1 DIR_LO DIR_MED DIR_HI TOT_LO TOT_MED TOT_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
a1b1 = a1*b1;
DIR_LO = cdash1 + cdash3*LOW_W;
DIR_MED = cdash1 + cdash3*MED_W;
DIR_HI = cdash1 + cdash3*HIGH_W;
TOT_LO = DIR_LO + a1b1;
TOT_MED = DIR_MED + a1b1;
TOT_HI = DIR_HI + a1b1;
PLOT(LOMOD MEDMOD HIMOD);
LOOP(XVAL,1,5,0.1);
LOMOD = (b0 + a0*b1 + cdash2*LOW_W) + TOT_LO*XVAL;
MEDMOD = (b0 + a0*b1 + cdash2*MED_W) + TOT_MED*XVAL;
HIMOD = (b0 + a0*b1 + cdash2*HIGH_W) + TOT_HI*XVAL;
PLOT: TYPE = plot2;
USEVARIABLES = X M W Y XW;
DEFINE: XW = X*W;
ANALYSIS:
TYPE = GENERAL;
ESTIMATOR = ML;
BOOTSTRAP = 10000;
MODEL:
[Y] (b0);
Y ON M (b1);
Y ON X (cdash1);
Y ON W (cdash2);
Y ON XW (cdash3);
[M] (a0);
M ON X (a1);
MODEL CONSTRAINT:
NEW(LOW_W MED_W HIGH_W a1b1 DIR_LO DIR_MED DIR_HI TOT_LO TOT_MED TOT_HI);
LOW_W = #LOWW;
MED_W = #MEDW;
HIGH_W = #HIGHW;
a1b1 = a1*b1;
DIR_LO = cdash1 + cdash3*LOW_W;
DIR_MED = cdash1 + cdash3*MED_W;
DIR_HI = cdash1 + cdash3*HIGH_W;
TOT_LO = DIR_LO + a1b1;
TOT_MED = DIR_MED + a1b1;
TOT_HI = DIR_HI + a1b1;
PLOT(LOMOD MEDMOD HIMOD);
LOOP(XVAL,1,5,0.1);
LOMOD = (b0 + a0*b1 + cdash2*LOW_W) + TOT_LO*XVAL;
MEDMOD = (b0 + a0*b1 + cdash2*MED_W) + TOT_MED*XVAL;
HIMOD = (b0 + a0*b1 + cdash2*HIGH_W) + TOT_HI*XVAL;
PLOT: TYPE = plot2;
OUTPUT: STAND CINT(bcbootstrap);