【求助】SAS中如何删除重复的关系对

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

数据形式如下：       列A  列B
1    红    蓝
2    红    绿
3    蓝    红
4    蓝    绿
……………

认为obs1（红-蓝）与obs3(蓝-红)是重复的观测对，要把obs3删掉，如何实现这一功能。
数据很多，最好给出程序。

坐等各位解答，谢过了！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：如何实现 数据形式 obs 如何 程序 最好

先把颜色按照2次幂进行format，然后对值a1,a2进行数学运算，然后sort 取nodupkey

楼上可不可以说的详细点啊？谢谢了~

比如有7种颜色，我们可以取
proc format;
   invalue color
   "红"=1
   “橙”=2
   “黄”=4
   “绿”=8
   “蓝”=16
   ...
；
run；
data b;
   set a;
   a1=input(a,color.);
   b1=input(b,color.);
   c=a1+b1;
   drop a1 b1;
run;

proc sort data=b nodupkey;
   by c;
run;

多谢楼上热心解答，但是我数据太多了，有60000条观测，而且为了方便提问，我用了颜色来代替字符串，其实是8个字节的字符串，要是用幂来format的话，是不大可能实现的~还是多谢了！

1. data raw;
   
2.     input col1 $ col2 $;
   
3.     id=_n_;
   
4. datalines;
   
5. red blue
   
6. red green
   
7. blue red
   
8. blue green
   
9. ;
   
10. data _null_;
    
11.     length col1 col2 $20;
    
12.     if _n_=1 then do;
    
13.         declare hash h(hashexp:4);
    
14.         rc=h.defineKey('col1','col2');
    
15.         rc=h.defineData('col1','col2','id');
    
16.         rc=h.defineDone();
    
17.         call missing(col1,col2,id);
    
18.     end;
    
19.     set raw end=last;
    
20.     if h.find() and h.find(key:col2,key:col1) then rc=h.add();
    
21.     if last then rc=h.output(dataset:'work.out');
    
22. run;

复制代码

首先把数据中重复出现的去掉,然后给这些颜色定义顺序，比如说1,2,3.....，也可以不用定义颜色的顺序，因为我们也可以比较字符串的大小顺序。然后比较两组的大小顺序，对于同一行如果a1《=a2，我们保持col1和col2的值保持不便，否则将col1和col2的值调换一下。然后sort取唯一的值