如何挑选出重复的部分

shiyiming

我想将四个数据集中完全重复的行数都挑出来，如何在DATA步中实现呢，谢谢？

shiyiming

data aa1;
input x y z@@;
cards;
1 1 1 2 2 2 3 3 3 4
4 4 5 5 5 6 6 6 7 7
7 8 8 8 9 9 9 0 0 0
;
data aa2;
input x y z@@;
cards;
1 1 1 2 1 2 3 3 3 4
3 4 5 5 5 2 3 4 7 7
7 3 4 5 9 9 9
;
data aa3;
input x y z@@;
cards;
1 1 1 2 4 3 3 3 3 5
3 5 5 5 5 7 6 7 7 7
7 9 6 9 9 9 9 9 0 9
0 0 0
;
proc sort data=aa1;
by _all_;
proc sort data=aa2;
by _all_;
proc sort data=aa3;
by _all_;
data aaa;
merge aa1(in=aaa1) aa2(in=aaa2) aa3(in=aaa3);
by _all_;
if aaa1=1 and aaa2=1 and aaa3=1;
proc print data=aaa;
run;