ljh_9802 发表于 2013-8-22 15:49
data mn ;
set m n ;
run ;
谢谢你,你用的方法我没有见过,但是针对这个问题真的挺好用,但是在一个大型数据集中,如果有两个数据的偶然相等也会因此删除,不过仍然感谢你的帮助
data m;
input z$2. x$2. y;
cards;
j a 1
j b 2
j c 3
;
run;
data n;
input z$2. x$2. y;
cards;
i c 3
i d 4
i e 5
;
data mn ;
set m n ;
run ;
proc sort data=mn nodupkey ;
by x ;
run ;
data m;
input x$2. y;
cards;
a 1
b 2
c 3
;
run;
data n;
input x$2. y;
cards;
c 3
d 4
e 5
;
run;
data new;
set m n;run;
proc sort nodup data=new;
by x;
run;
proc sql;
create table median as
select count(*) into: count
from new;
quit;
data last(drop=x y);
array aa {&count} $;
array bb {&count};
do i=1 to &count;
set new point=i;
aa(i)=x;
bb(i)=y;
end;
output;
stop;
run;