关于proc freq的问题

我想按组统计多个变量的频数。
比如我有数据test。内容如下：
ID a b c d ...
1 10 30 10 20
1 10 10 10 15
2 15 20 10 10
3 10 15 15 15
3 20 15 20 10
3 10 15 20 10
4 15 20 15 15
4 10 10 15 15
5 20 10 30 10
...
一般来说
proc freq data=test;
table a;
run;
这样的话 ID1的 10这个值是两个，
可是我想要的结果是如果同样ID的变量值相同的话只算一个。
就是说proc freq后变量a的结果是
10这个值会出现3次而不是5，
而变量b的15这个值会出现1次而不是3。
变量有很多从a~z，在data步一个变量一个变量去除重复很麻烦，而且花时间。
ods也试过数据太大，机器带不动。请问有没有更有效率的方法？

data test;
input ID a b c d@@;
cards;
1 10 30 10 20
1 10 10 10 15
2 15 20 10 10
3 10 15 15 15
3 20 15 20 10
3 10 15 20 10
4 15 20 15 15
4 10 10 15 15
5 20 10 30 10
;
run;
proc sql;
select b, count(b) as count
from
(select distinct ID,b
from test)
group by b
;
quit;

按照你上面表达,ID 相同情况下只计算一次的话,10只出现了3次!

不好意思，是3次

a,b,c,d....你替换下就行了

我的理解是这样的：如果ID和a一样的 不管其他变量是否相同，楼主只想保留第一次出现的observation，然后统计？如果我的理解是对的，可以使用proc sort的nodupkey选项，之后再用proc freq：
data test;
input ID a b c d@@;
cards;
1 10 30 10 20
1 10 10 10 15
2 15 20 10 10
3 10 15 15 15
3 20 15 20 10
3 10 15 20 10
4 15 20 15 15
4 10 10 15 15
5 20 10 30 10
;
run;

proc sort data=test nodupkey out=test1;
by ID a;
run;

proc freq data=test1;
table a;
run;

在上面哥们基础上假如宏，就可以做完a-z了
首先：建立外部宏文本 aaa.txt,文本内容为  %solution(a);  ......  %solution(z);
其次，建立宏：
data test;
input ID a b c d@@;
cards;
1 10 30 10 20
1 10 10 10 15
2 15 20 10 10
3 10 15 15 15
3 20 15 20 10
3 10 15 20 10
4 15 20 15 15
4 10 10 15 15
5 20 10 30 10
;
run;
%macro solution(letter);
proc sql;
select &letter., count(&letter.) as count
from
(select distinct ID,&letter.
from test)
group by &letter.
;
quit;
%mend solution;
最后，调用宏文本：
%include "C:\Documents and Settings\Administrator\桌面\aaa.txt"
没运行过 仅提供思路

1. data test;
   
2. input ID a b c d;
   
3. cards;
   
4. 1 10 30 10 20
   
5. 1 10 10 10 15
   
6. 2 15 20 10 10
   
7. 3 10 15 15 15
   
8. 3 20 15 20 10
   
9. 3 10 15 20 10
   
10. 4 15 20 15 15
    
11. 4 10 10 15 15
    
12. 5 20 10 30 10
    
13. ; run;
    
14. 
    
15. proc sql;   
    
16.     select name into :varname separated by ' '
    
17.        from dictionary.columns
    
18.        where libname = 'WORK' and memname='TEST' and name ^='ID';
    
19.        select count(name) into : n_var
    
20.        from dictionary.columns
    
21.        where libname = 'WORK' and memname='TEST' and name ^='ID';
    
22. quit;
    
23. 
    
24. %macro mymacro;
    
25.     %do i = 1 %to   &n_var;
    
26.     %let var=%scan(&varname, &i);  %put &var;
    
27.        proc sql;
    
28.           create table &var as
    
29.           select distinct ID, &var as num, "&var" as variable, count(*) as count
    
30.           from test
    
31.           group by id, &var;
    
32.        quit;
    
33.        proc append  base=want data=&var;
    
34.        run;
    
35.     %end;
    
36. %mend;
    
37. %mymacro;
    
38. 
    
39. /* use proc freq */
    
40. proc freq data=test;
    
41.     table ID*a / nopercent norow nocol out=freq_a (drop=percent rename=(count=count_a));
    
42.     table ID*b / nopercent norow nocol out=freq_b (drop=percent rename=(count=count_b));
    
43.     table ID*c / nopercent norow nocol out=freq_c (drop=percent rename=(count=count_c));
    
44.     table ID*d / nopercent norow nocol out=freq_d (drop=percent rename=(count=count_d));
    
45. run;

复制代码

1. data t;
   
2. set sashelp.class;
   
3. w =round(weight, 10);
   
4. h =round(height, 10);
   
5. run;
   
6. 
   
7. %let varList =name age w h;
   
8. %let FvarList=;
   
9. %macro makeFvarList;
   
10.         %do i =1 %to %sysfunc(countw(&varList));
    
11.                 %let FvarList =&FvarList F_%scan(&varList, &i);
    
12.                 %end;
    
13. %mend makeFvarList;
    
14. %makeFvarList;
    
15. 
    
16. proc freq data =t;
    
17. ods output crosstabfreqs =ctf(where =(_type_ ='11' & frequency));
    
18.         tables sex*(&varList)/nopercent nocol norow;
    
19.         run;
    
20. 
    
21. proc freq data =ctf(keep =&VarList _type_ frequency );
    
22. ods output onewayfreqs =ctf2;
    
23.         tables &varList/nopercent nocol norow nocum;
    
24.         run;
    
25. 
    
26. data ctf3;
    
27.         set ctf2(keep =table &FvarList Frequency );
    
28.         var =scan(table, -1);
    
29.         val =cats(of &FvarList);
    
30.         run;

复制代码