如何得到这样的数据集

dxystata 发表于 2014-10-19 22:55
如何再保留c a b对应的oid 和x2的取值？谢谢！
oid  x2
1    aaa

data ccc;
   set aaa end=last;
   by site name notsorted;

        if _n_=1 then call execute("data ddd(keep=oid x2 name site: drop=site); merge ");
        if first.site then call execute(cats("ccc(where=(site=",site,") rename=(_x1=site",site,"))"));
        if last then call execute(" ccc(where=(^missing(x2)) keep=name_order x2 oid) ; by name_order; run;");

        if first.site then name_order=0;
    if first.name then do; _x1=catx(" ",x1); name_order+1; end;
    else if not first.name then _x1=catx(" ",_x1,x1);
    if last.name;
    retain _x1 ;
run;

dxystata 发表于 2014-10-19 22:22
data ccc;
   set aaa end=last;
   by site name notsorted;

总体的思路就是下面两步：
1. 合并每个name在某个site内的值，确保每个site+name只有一条记录；
2. 选出每个site的记录，并merge到一起。

由于第二步需要知道有多少个site以及每个site的值，这样在计算第一步的同时，第二步的代码也可以做出来。
代码放到CALL EXECUTE()里，这些代码就会在data CCC之后运行。