data raw;
input t1 t2 t3 t4@;
cards;
-0.0135 -0.0629 0.0364 -0.0406
-0.0443 -0.0861 0.087 -0.0124
0.0927 -0.0468 0.089 0.0324
-0.0199 -0.0617 0.1312 -0.0152
0.0314 -0.1049 -0.0737 -0.0045
-0.0367 -0.1254 -0.0078 0.0215
-0.0292 -0.1817 0.0431 0.0383
0.0141 0.0108 0.0143 -0.0235
0.0139 0.0302 0.0399 0.0192
-0.0106 -0.0946 0.1088 0.0011
-0.0401 -0.0358 -0.0397 0.0152
-0.1493 -0.152 -0.0207 0.0845
0.0117 -0.0924 -0.1379 0.075
-0.02 -0.1023 0.054 0.0364
0.0062 -0.0661 0.0554 0.0313
-0.0024 -0.1479 -0.0108 0.0332
-0.1075 -0.168 0.0618 0.1005
-0.0009 -0.1234 -0.0804 -0.0564
0.0328 -0.2066 0.0186 0.0127
-0.0614 -0.1264 -0.0845 0.041
;run;
%macro fun;
%do i=1 %to 3;
proc reg data=raw;
model t%eval(&i+1)=t&i;
run;
%end;
%mend;
%fun;