请教高手，不知如下程序为何通不过？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

data tes;
    set mysas.stocktest;
run;
%macro fun;
%do i=0 %to 33;
proc reg data=tes outest=v&i;       /*:做循环回归，并将所得回归斜率系数命名为vi   */
model t%eval(&i+1)=t&i;
%end;
%mend;
%fun;
v=mean(of v1,v33);      /*:求回归斜率v1直到v33的平均值*/
proc print v;                  /*:输出v的值
run;

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：请教高手 outest print Stock model 请教 程序 高手

1# climax577

开个玩笑，你好像对SAS的基本概念还没有呢。

1. data _null_;
   
2. set v1-v30;
   
3. ...
   
4. run;

复制代码

如果你真是需要帮忙，给个数据（几个观测就行）。让大家在SAS一试，就有答案了。否则。。

-0.0135        -0.0629        0.0364        -0.0406        -0.0286
-0.0443        -0.0861        0.087        -0.0124        0.0478
0.0927        -0.0468        0.089        0.0324        0.0941
-0.0199        -0.0617        0.1312        -0.0152        0.1524
0.0314        -0.1049        -0.0737        -0.0045        0.0067
-0.0367        -0.1254        -0.0078        0.0215        -0.0497
-0.0292        -0.1817        0.0431        0.0383        -0.0221
0.0141        0.0108        0.0143        -0.0235        0.0594
0.0139        0.0302        0.0399        0.0192        -0.0349
-0.0106        -0.0946        0.1088        0.0011        0.0632
0        0        0        0        0
-0.0401        -0.0358        -0.0397        0.0152        0.0171
-0.1493        -0.152        -0.0207        0.0845        -0.0433
0.0117        -0.0924        -0.1379        0.075        0.0496
-0.02        -0.1023        0.054        0.0364        -0.0191
0.0062        -0.0661        0.0554        0.0313        0.0141
-0.0024        -0.1479        -0.0108        0.0332        -0.0409
-0.1075        -0.168        0.0618        0.1005        0.0546
-0.0009        -0.1234        -0.0804        -0.0564        0.1451
0.0328        -0.2066        0.0186        0.0127        -0.0091

-0.0135        -0.0629        0.0364
-0.0443        -0.0861        0.087
0.0927        -0.0468        0.089
-0.0199        -0.0617        0.1312
0.0314        -0.1049        -0.0737
刚才数据发的太多了，试试下面的！
   t1             t2            t3
-0.0367        -0.1254        -0.0078
-0.0292        -0.1817        0.0431
0.0141        0.0108        0.0143
0.0139        0.0302        0.0399
-0.0106        -0.0946        0.1088

4# climax577

1. 
   
2. data tes;
   
3. input t1 t2  t3;
   
4. datalines;
   
5. -0.0367        -0.1254        -0.0078
   
6. -0.0292        -0.1817        0.0431
   
7. 0.0141        0.0108        0.0143
   
8. 0.0139        0.0302        0.0399
   
9. -0.0106        -0.0946        0.1088
   
10. ;
    
11. run;
    
12. %macro fun;
    
13. data est;*create an empty dataset to load values;
    
14. length est 8.;
    
15. delete;
    
16. run;
    
17. %do i=1 %to 2;*2=3-1;
    
18. proc reg data=tes outest=out(keep=t&i rename=(t&i=est)); *output each estimate dataset,leave one interested;      
    
19.   model t%eval(&i+1)=t&i;
    
20. quit;
    
21. proc append base=est data=out force;*put all output datasets together to a bigger one 'est';
    
22. run;
    
23. %end;
    
24. proc sql;
    
25. create table result as
    
26.   select avg(est) as MeanSlope from est;*get the avg slope;
    
27. quit;
    
28. proc print; run;*output to listing window;
    
29. quit;
    
30. %mend fun;
    
31. %fun
    
32. ;

复制代码

这应该你想要的，虽然我不很理解你这里的平均斜率的意义。

data tes;

input t1 t2  t3;

datalines;

-0.0367        -0.1254        -0.0078

-0.0292        -0.1817        0.0431

0.0141        0.0108        0.0143

0.0139        0.0302        0.0399

-0.0106        -0.0946        0.1088

;

run;

%macro fun;

data est;*create an empty dataset to load values;

length est 8.;

delete;

run;

%do i=1 %to 2;*2=3-1;

proc reg data=tes outest=out(keep=t&i rename=(t&i=est)); *output each estimate dataset,leave one interested;      

  model t%eval(&i+1)=t&i;

quit;

proc append base=est data=out force;*put all output datasets together to a bigger one 'est';

run;

%end;

proc sql;

create table result as

  select avg(est) as MeanSlope from est;*get the avg slope;

quit;

proc print; run;*output to listing window;

quit;

%mend fun;

%fun

;
好样的,攒一个

非常感谢两位高人指点！！！