请教各位高手：数据集的记录筛选及转置问题

第一个问题：如何从一个已知的数据集中将具有相同ID的记录（>=2条以上）筛选出来建立一个新的数据集？
举例说明：

ID	x
450001	15
450001	14
450002	12
450003	13
450012	18
450012	19
450104	18
450104	12
450104	15

等等....数据集里记录达3万多条且ID编号没有多大规律可循！想要得到这样的结果：

ID	x
450001	15
450001	14
450012	18
450012	19
450104	18
450104	12
450104	15
...	...
...	...
...	...
...	...
...	...

即具有唯一ID的记录不进入新数据集，具有相同ID 的两条或两条以上的记录进入新数据集；


第二个问题：在建成上述新数据集的基础上可不可以将每个ID变成唯一的一条记录，变量x重新被命名，有几个相同的ID记录就有几个x变量。即想得到这样的形式：

ID	x1	x2	x3
450001	15	14	.
450012	18	19	.
450104	18	12	15
...	...	...	...

谢谢大家！！！

1# zhushji

1. *use the above dataset a;
   
2. proc sort data=a; by id; run;
   
3. data new;
   
4. set a;
   
5. by id;
   
6. if first.id then if first.id=last.id then delete;
   
7. run;
   
8. proc transpose data=new out=out(drop=_name_) prefix=x;
   
9. by id;
   
10. var x;
    
11. run;

复制代码

data a;
input
ID x @;
z=_n_;
cards;
450001 15
450001 14
450002 12
450003 13
450012 18
450012 19
450104 18
450104 12
450104 15
;run;
proc sql ;
create table new1 as select * ,count(id) as count
from a group by id having count>=2 order by z;
alter table new1 drop z ,count;quit;
proc transpose data=new1 out=new2(drop=_name_) prefix=x;
by id;var x;run;

1. data a;
   
2. input
   
3. ID x @;
   
4. cards;
   
5. 450001 15
   
6. 450001 14
   
7. 450002 12
   
8. 450003 13
   
9. 450012 18
   
10. 450012 19
    
11. 450104 18
    
12. 450104 12
    
13. 450104 15
    
14. ;run;
    
15. proc sort;by id;run;
    
16. data b;
    
17. set a;
    
18. by id;
    
19. if first.id=1 & last.id=1 & first.id=last.id then delete;
    
20. run;
    
21. proc transpose data=b out=c(drop=_NAME_);
    
22. by id;var x;run;

复制代码

4# lion_li

if first.id=1 & last.id=1 & first.id=last.id then delete;

这应该是对我的程序的修改了。请问什么理由呢？只是请教，没有冒犯的意思。

1. 
   
2. proc transpose data=b out=c(drop=_NAME_);

复制代码

没有了prefix 选项，如何得到x1 x2 x3...呢？

proc sql;
   create table b as
   select Id, x
        from  
      (select Id, x, count(id) as N_id
           from a
       group by id
       having N_id >=2);
quit;

佩服！佩服！

学习学习，了不起

学习学习，了不起
本文来自: 人大经济论坛 详细出处参考：http://www.pinggu.org/bbs/viewth ... &from^^uid=164598