关于Merge的问题

数据集如下
a b c
1 2 11
1 3 22
1 4 33
2 1 44
2 3 11
......
想变成的样子是
a b c
1 1 .
1 2 11
1 3 22
1 4 .
2 1 44
2 2 .
2 3 11
2 4 .
.....
即对a 的取值，b都要从1取到4，c保持原有值或者缺失。
。，sas刚入门，谢谢各位大侠帮帮忙。。。。

/*生成中间辅助数据集*/
data b;
do a=1 to 2;  /*假设你的a 数据集中变量a的值只到2*/
do b=1 to 4;
output;
end;
end;
run;

proc sort data=a;
  by a b;
run;

proc sort data=b;
  by a b;
run;
/*t生成目标数据集*/
data want;
merge a b;
by a b;
run;

webgu 发表于 2012-6-10 22:49
/*生成中间辅助数据集*/
data b;
do a=1 to 2;  /*假设你的a 数据集中变量a的值只到2*/

非常感谢你的回答，不过我的a不是规律的。
我自己想了个办法，写出来跟大家分享下
data a;
set b;
by a;
if first.a;
run;
data d;
set a;
by a;
do i=1 to 4;
b=i;
output;
drop i;
end;
proc sort data=d;
by a b;
run;
proc sort data=b;
by a b;
run;
data e;
merge d b;
by a b;
run;

1. data out;
   
2.     array arr{4} _temporary_;
   
3.     do until(last.a);
   
4.         set raw;
   
5.         by a;
   
6.         arr(b)=c;
   
7.     end;
   
8.     do b=1 to dim(arr);
   
9.         c=arr(b); output; arr(b)=.;
   
10.    end;
    
11. run;

复制代码

1. data ads;
   
2. input a b c;
   
3. ab=strip(a)||strip(b);
   
4. cards;
   
5. 1 2 11
   
6. 1 3 22
   
7. 1 4 33
   
8. 2 1 44
   
9. 2 3 11
   
10. ;
    
11. 
    
12. data bds;
    
13. do a=1 to 2;
    
14. do b=1 to 4;
    
15. ab=strip(a)||strip(b);
    
16. output;
    
17. end;
    
18. end;
    
19. run;
    
20. 
    
21. proc sql noprint;
    
22. create table cds as
    
23. select bds.a,bds.b,bds.ab
    
24. from bds
    
25. where ab not in (
    
26.                  select ab
    
27.                                  from ads
    
28.                  );
    
29. quit;
    
30. 
    
31. data dds;
    
32. set ads cds;
    
33. run;
    
34. 
    
35. proc sort data=dds;
    
36.   by ab;
    
37. run;
    
38. 
    
39. data eds;
    
40.   set dds;
    
41.   drop ab;
    
42. run;

复制代码

如果你的数据集中的a是不规律的，只要修改一下这个程序就可以了。

good to know

data inter;
do a=1 to 2;
do b=1 to 4;
output;
end;
end;
run;

/* Let Origin be the data set containing your original data*/
proc sql;
create table New as
select I.*, c
from Origin as O
right join Inter as I
on O.a =I.a and O.b=I.b
;
quit;

run;