如何一次建立多个多元线性方程？自变量X1-X4,因变量Y1-Y4,写个宏还是有语句实现？多谢多谢！

%macro K(i);
proc reg data=XX
    model Yi=X1 X2 X3 X4;
output out=yi;
run;
%mend;

%k(1);


原数        X1        X2        X3        X4        Y1        Y2        Y3        Y4
2005        111.30         104.90         807.02        16.72%        24.08775078        21.40181411        22.03501564        21.35504191
2006        112.70         103.00         780.87        6.29%        24.34857117        21.63724273        22.1906354        21.62516971
2007        114.20         103.10         730.46        14.77%        24.53597259        21.87466192        22.31383367        21.77616173
2008        109.60         106.90         683.46        -1.65%        24.74416574        21.94939229        22.46336208        21.8239843