如何提取相应条件的重复值

请教论坛里的高人，帮个忙吧
name type num date
X aaaa 1 200909
X aaab 2 200910
X aaab 3 200910
X aaab 13 201005
X aabb 4  201103
X abbb 10 201010
X aabb 12 201103
X bbbb 11 201002
Y aaaa 5 200808
Y aaab 6 200909
Z abab 7 201101
Z aabb 8 201102
Z abab 9 201103
;
我想提取name和type中组合相同的清单，然后再在此清单中可以按照要求来提取date中差异在1个月以上（或者1年）的所有清单，这样结果就该是
X aaab 2 200910
X aaab 3 200910
X aaab 13 201005
Z abab 7 201101
Z abab 9 201103
达人们来吧！

感谢cathy，解决的很完美，佩服高手

1. data aa;
   
2. input name $ type $ num date $;
   
3. cards;
   
4. X aaaa 1 200909
   
5. X aaab 2 200910
   
6. X aaab 3 200910
   
7. X aaab 13 201005
   
8. X aabb 4  201103
   
9. X abbb 10 201010
   
10. X aabb 12 201103
    
11. X bbbb 11 201002
    
12. Y aaaa 5 200808
    
13. Y aaab 6 200909
    
14. Z abab 7 201101
    
15. Z aabb 8 201102
    
16. Z abab 9 201103
    
17. ;
    
18. run;
    
19. 
    
20. proc sql;
    
21.         create table aa1 as select
    
22.         name
    
23.         ,type
    
24.         ,count(distinct date) as cnt
    
25.         /*下面的sql过程中将cnt>1作为条件，所以，需要保证的是date变量是数值的或者字符的精确到月，
    
26.         要是想到大于1年的话，得进行预先处理，把date取前4位数比如int(date/100)之类的*/
    
27.         from aa
    
28.         group by name,type;
    
29.         create table aa2 as select
    
30.         aa.*
    
31.         from aa inner join aa1
    
32.         on aa.name=aa1.name
    
33.         and aa.type=aa1.type
    
34.         and cnt>1;
    
35. quit;

复制代码

不知道是不是你想要的，呵呵

居然整出来了，但是要处理5步，感觉过程冗余，看看高手们有没有好的解答。

达人们快来看看呀

我之前发的贴好像可以用上:

1)  proc sort data=data1 out=data2;
     by name type;     run;
2) proc transpose data=data2 out=data3 prefix=date_;
    by name type;
    var date;
   run;
3) data data4; set data3;
   array date(13) date_1_date_13;  
   do i=1 to 13;
   if ....

if condition  需要你自己去琢磨了.

我只是个高中生.

学习了~~~thanks~

牛人啊~~顶

认可的话应该给点赏钱。

哈哈。。

不客气不客气，其实我也学了没多久，大家一起加油啊！呵呵