如何实现

1. data aaa;
   
2. input x$;
   
3. cards;
   
4. c
   
5. a
   
6. b
   
7. ;
   
8. run;
   
9. 
   
10. 
    
11. data bbb;
    
12. input y$;
    
13. cards;
    
14. d
    
15. c
    
16. b
    
17. a
    
18. ;
    
19. run;

复制代码

从bbb数据集变量y的取值去除和aaa数据集变量x相同的取值。然后再拼接。
希望得到的数据为：
x y
c d
a d
b d

proc sql noprint;
  create table ccc as select *
  from aaa, (
    select * from bbb
    except
    select * from aaa)
  ;
quit;

proc sort data=work.aaa;by x;run;
proc sort data=work.bbb;by y;run;
data ccc;
        merge aaa(in=left rename=(x=y)) bbb(in=right );
        by y ;
        if not left and right;
run;

proc sql ;
        create table work.want as select a.*,c.* from work.aaa a,work.ccc c;
quit;

缘oO来如此0o 发表于 2021-4-2 22:31
proc sort data=work.aaa;by x;run;
proc sort data=work.bbb;by y;run;
data ccc;

最后的数据集x的顺序变了。谢谢！

不知道不用sql，能否用data步简单实现。

dxystata 发表于 2021-4-7 09:18
不知道不用sql，能否用data步简单实现。

我试了试，不能“简单”实现，如您有办法，请分享来看看。
主要的困难在于获取数据集aaa和bbb的差，完全用data步比较难想出简单的方法。
仅为拓宽思路，下例供参考：

1. data ccc;
   
2.   set aaa bbb(rename=y=x);
   
3. run;
   
4. 
   
5. proc sort out = ccc nouniquekey uniqueout = ddd;
   
6.   by x;
   
7. run;

复制代码

上面的程序给出了获取两个集合(数据集)的差的另一种方法。