一个关于求和的问题

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

有这样一组数据

nvic   premclss inforce
1         VST        1
1         VST        1
1         VSC        1
1         VSF        1
2         VSF        1
2         VSC        1
2         VSF        1
.....

我想得到如下结果
nvic    VST    VSC  VSF   toal_inforce
  1        2        1      1            4
  2        0        1      2            3
....
我现在是先以premclss分成三个table然后求和，然后建另外一个table是以nvic的求和。然后4个table在merger起来。
有没有高手能够一个程序就能写出来的？谢谢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Merger Table Force Merge ABLE 程序

proc means data=have;
by nvic premclss;
output out=want sum=sum;
run;

proc transpose data=want out=want_trans;
by nvic;
id premclss;
var sum;
run;

data want_trans;
set want_trans;
toal_inforce=VST+VSC+VSF;
run;

非常感谢

1. data test1;
   
2. input nvic   premclss $ inforce ;
   
3. cards;
   
4. 1 VST 1
   
5. 1 VST 1
   
6. 1 VSC 1
   
7. 1 VSF 1
   
8. 2 VSF 1
   
9. 2 VSC 1
   
10. 2 VSF 1
    
11. ;
    
12. proc sort data=test1 out=test2 ;
    
13.         by nvic premclss;
    
14. run;
    
15. data test3;
    
16.         set test2;
    
17.         by nvic premclss;
    
18.         if first.premclss then n=1;
    
19.                 else n+1;
    
20.         if last.premclss then output;
    
21. run;
    
22. proc transpose data=test3 out=test4(drop=_name_);
    
23.         by nvic;
    
24.         id premclss;
    
25.         var n;
    
26. run;
    
27. data test5(drop=i);
    
28.         set test4;
    
29.         array var_n{*}_numeric_;
    
30.         do i=1 to dim(var_n);
    
31.                 if var_n{i}=. then var_n{i}=0;
    
32.         end;
    
33.         toal_inforce=sum(of v:);
    
34. run;

复制代码

老师她摸我 发表于 2012-12-6 11:04

非常感谢，再次感觉SAS真的好强大，学到了很多从上面两个回帖

1. proc tabulate;
   
2. class pre nvic;
   
3. table nvic,pre all;
   
4. keylabel all='toal_inforce';
   
5. run;

复制代码