请问怎么给相同的股票代码后面加上一列相同的数字？

前面的股票代码（stkcd）类似这样的一列数字:

000004
000004
000004
000002
000002
000007
000007
600021
600021
600021


.................
想多加一列从1开始的数字(num)作为标签变成这样：

000004   1
000004   1
000004   1
000002   2
000002   2
000007   3
000007   3
600021   4
600021   4
600021   4

...................
请问怎么办呀？才入门SAS求指导

1. data a;
   
2.         input stkcd$;
   
3. cards;
   
4. 000004
   
5. 000004
   
6. 000004
   
7. 000002
   
8. 000002
   
9. 000007
   
10. 000007
    
11. 600021
    
12. 600021
    
13. 600021
    
14. ;
    
15. run;
    
16. 
    
17. data b;
    
18.         set a ;
    
19.         by stkcd notsorted;
    
20.         if first.stkcd then new+1;
    
21. run;

复制代码

孤单的我们 发表于 2016-4-11 14:07

能不能再问您一下 我写的宏为什么一直循环没有停止呀？我明明写了%end

%macro ma;                                                                                                                                                                                                                                                      
  %do num=1 %to 2223;                                                                                                                                                                                                                                          
      data t4_1;                                                                                                                                                                                                                                                
        set t3;                                                                                                                                                                                                                                                
        RETAIN Mretwd_sum 0;                                                                                                                                                                                                                                    
        last60=lag60(Mretwd);                                                                                                                                                                                                                                   
        if count gt 60 then Mretwd_sum=sum(Mretwd_sum,Mretwd,-last60);                                                                                                                                                                                          
        else Mretwd_sum=sum(Mretwd_sum,Mretwd);                                                                                                                                                                                                                                                                                                                     
      run;                                                                                                                                                                                                                                                      
  %end;                                                                                                                                                                                                                                                         
%mend;

赵天静 发表于 2016-4-11 14:43
能不能再问您一下 我写的宏为什么一直循环没有停止呀？我明明写了%end

%macro ma;                    ...

这个循环有什么意义吗？执行了2223次一样的操作，应该是循环的次数太多。

孤单的我们 发表于 2016-4-11 14:54
这个循环有什么意义吗？执行了2223次一样的操作，应该是循环的次数太多。

想对每一只股票都求一次移动平均。。一共有2333只股票
就想 在new=1的里面，做一次if；在new=2里面，做一次if。。。。。。。在new=2223里面，做一次if

赵天静 发表于 2016-4-11 15:09
想对每一只股票都求一次移动平均。。一共有2333只股票
就想 在new=1的里面，做一次if；在new=2里面，做 ...

1. proc sql noprint;
   
2.         select distinct stkcd into:stkcd1-:stkcd2333 from have group by stkcd;
   
3. quit;
   
4. 
   
5. %macro ma;
   
6.         %do num=1 %to 2223;
   
7.                 data t4_#
   
8.                         set t3(where=(stkcd="&&stkcd&i"));
   
9.                         ……
   
10.                         ……
    
11.                 run;
    
12.         %end;
    
13. %mend;

复制代码

孤单的我们 发表于 2016-4-11 16:25

可不可以只要生成一个表啊？
而且前面的sql语句报错 from后面的have group报错

赵天静 发表于 2016-4-11 23:32
可不可以只要生成一个表啊？
而且前面的sql语句报错 from后面的have group报错

have是你的数据集名

1. %macro ma;
   
2. %if sysfunc(exist(want,data)) %then %do;
   
3. proc sql noprint;
   
4.     drop table want;
   
5. quit;
   
6. %end;
   
7.         %do num=1 %to 2223;
   
8.                 data want;
   
9.                         set %if sysfunc(exist(want,data)) %then want; t3(where=(stkcd="&&stkcd&i"));
   
10.                         ……
    
11.                         ……
    
12.                 run;
    
13.         %end;
    
14. %mend;

复制代码