按条件插入一列

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

比如说，有四个班级，10个人，每个人都有自己的人品，abcd四个等级，现在想插入一列“班级人品”，该特征是以这个班级中人品最好的人为标准。比如“班级1”的三个人1、2、3,“1”的人品最好，为a，那么班级1的所有成员班级人品都赋为a。请问这一列如何插入？代码如何写呢？
真实数据大概有100万条。是sas啊，不是excel~

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：EXCEL exce ABCD xcel 最好的 excel 如何 最好

是不是要用do循环
do 班级= 1 to 4;
if  班级中的人品最高的为a then 该班级的全部班级人品=a
  else if  班级中的人品最高的为b then 该班级的全部班级人品=b
  else if  班级中的人品最高的为c then 该班级的全部班级人品=c
  else if  班级中的人品最高的为d then 该班级的全部班级人品=d;
end;
具体代码不会，恳请各位老师指点~

1. data a;
   
2. input ren  banji  renpin $;
   
3. cards;
   
4. 1 1 a
   
5. 2 1 c
   
6. 3 1 c
   
7. 4 2 b
   
8. 5 2 b
   
9. 6 3 c
   
10. 7 3 a
    
11. 8 3 b
    
12. 9 4 b
    
13. 10 4 c
    
14. ;
    
15. proc sql;
    
16. create table result as
    
17. select *,byte(min(rank(renpin))) as banjirenpin label='班级人品'
    
18. from a
    
19. group by banji
    
20. order by banji,ren;
    
21. quit;

复制代码

shenliang_111 发表于 2012-1-11 11:33

非常感谢！
用sql的话，结果应该是表直接输出在result窗口吗？因为有100万条，太多了，能不能直接储存成一个表，而不查看呢？谢谢！

shenliang_111 发表于 2012-1-11 11:33

明白了明白了！
刚才没看到create table。。。
谢谢！我试试，遇到问题再请教你哈~！

shenliang_111 发表于 2012-1-11 11:33

Run it to see if it works in your version of SAS.   

data a;
    input ren  banji  renpin $;
    cards;
    1 1 a
    2 1 c
    3 1 c
    4 2 b
    5 2 b
    6 3 c
    7 3 a
    8 3 b
    9 4 b
    10 4 c
    ;
    proc sql;
    select *,min(renpin) as renpin_max
    from a
    group by banji
    order by banji,ren;
    quit;

                                 ren     banji  renpin    renpin_max
                            ƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒƒ
                                   1         1  a         a
                                   2         1  c         a
                                   3         1  c         a
                                   4         2  b         b
                                   5         2  b         b
                                   6         3  c         a
                                   7         3  a         a
                                   8         3  b         a
                                   9         4  b         b
                                  10         4  c         b

也可以试试DATA步。数据量大，可能bobguy大侠的效率要高。

1. data raw;
   
2.     input ren  banji  renpin $;
   
3.     cards;
   
4.     1 1 a
   
5.     2 1 c
   
6.     3 1 c
   
7.     4 2 b
   
8.     5 2 b
   
9.     6 3 c
   
10.     7 3 a
    
11.     8 3 b
    
12.     9 4 b
    
13.     10 4 c
    
14.     ;
    
15. proc sort data=raw;
    
16.   by banji renpin;
    
17. run;
    
18. data out;  
    
19.    format ren banji renpin renpin_bj;
    
20.    retain renpin_bj;
    
21.    set raw;
    
22.    by banji renpin;
    
23.   if first.banji then renpin_bj=renpin;
    
24. run;

复制代码