Type : CREATION_INTERNE
Der Datensatz 'Mono1' wird vollständig im ersten DATA-Schritt mithilfe von Schleifen und Zufallsfunktionen (rannor, ranuni) generiert.
| 1 | DATA Mono1; |
| 2 | DO Trt=0 to 1; |
| 3 | DO j=1 to 5; |
| 4 | y0=10 + rannor(999); |
| 5 | y1= y0 + Trt + rannor(999); |
| 6 | IF (ranuni(999) < 0.3) THEN y1=.; |
| 7 | OUTPUT; |
| 8 | END; END; |
| 9 | |
| 10 | DO Trt=0 to 1; |
| 11 | DO j=1 to 45; |
| 12 | y0=10 + rannor(999); |
| 13 | y1= y0 + Trt + rannor(999); |
| 14 | IF (ranuni(999) < 0.3) THEN y1=.; |
| 15 | OUTPUT; |
| 16 | END; END; |
| 17 | drop j; |
| 18 | RUN; |
| 1 | PROC PRINT DATA=Mono1(obs=10); |
| 2 | var Trt Y0 Y1; |
| 3 | title 'First 10 Obs in the Trial Data'; |
| 4 | RUN; |
| 1 | PROC MI DATA=Mono1 seed=14823 nimpute=20 out=outex12a; |
| 2 | class Trt; |
| 3 | monotone reg; |
| 4 | var Trt y0 y1; |
| 5 | RUN; |
| 1 | ods select none; |
| 2 | PROC REG DATA=outex12a; |
| 3 | model y1= Trt y0; |
| 4 | BY _Imputation_; |
| 5 | ods OUTPUT parameterestimates=regparms; |
| 6 | RUN; |
| 7 | ods select all; |
| 1 | |
| 2 | PROC MIANALYZE parms=regparms; |
| 3 | modeleffects Trt; |
| 4 | RUN; |
| 5 |
| 1 | PROC MI DATA=Mono1 seed=14823 nimpute=20 out=outex12b; |
| 2 | class Trt; |
| 3 | monotone reg; |
| 4 | mnar model( y1 /modelobs=(Trt='0')); |
| 5 | var y0 y1; |
| 6 | RUN; |
| 1 | ods select none; |
| 2 | PROC REG DATA=outex12b; |
| 3 | model y1= Trt y0; |
| 4 | BY _Imputation_; |
| 5 | ods OUTPUT parameterestimates=regparms; |
| 6 | RUN; |
| 7 | ods select all; |
| 1 | |
| 2 | PROC MIANALYZE parms=regparms; |
| 3 | modeleffects Trt; |
| 4 | RUN; |
| 5 |