- proc sort data=a1; by t;run; /*modified*/
- proc transpose data=a1 out=a2 prefix=_;
- id i;
- by t;
- var y;
- run;
- data a3;
- set a2;
- yt_1=sum(lag1(_1), lag1(_2), lag1(_3), lag1(_4));
- run;
- proc sql noprint;
- create table final as
- select a1.*
- , a3.yt_1
- from a1, a3
- where a1.t=a3.t
- ;
- run;


雷达卡





京公网安备 11010802022788号







