proc univariate noprint data=data1;
var vol;
output out=quintile pctlpts=10 20 80 90 pctlpre=pct;
by size;
run;
proc sort data=data1;
        by size;

data data1;
merge data1 quintile;
        by size;
        if .<vol<=pct20 then group=1;
        if pct20<vol<=pct80 then group=2;
        if pct80<vol<=pct90 then group=3;
        if pct90<vol then group=4;
run;

四个点分成四组？京剧

谢谢jl60156，我明白你的思路，但是我的数据集文件太大，运行一次proc sort 或proc merge花费时间特别长，这样处理起来效率特别低，我希望能通过宏以及proc format来提高运行效率，我只晓得单变量分组，对于交叉分组一时不晓得怎么处理，你能有更高效一点的方法吗？

四个点分成五组，写错了

try hash object, it might improve processing speed.


proc univariate noprint data=data1;
var vol;
output out=quintile pctlpts=10 20 80 90 pctlpre=pct;
by size;
run;
data data2;
attrib
pct10 length=8
pct20 length=8
pct80 length=8
pct90 length=8
group length=8;
if _n_=1 then do;
declare hash p(dataset: 'quintile(rename=(size=id))',ordered: 'yes');
declare hiter pi('p');
p.definekey('id');
p.definedata('id','pct10','pct20','pct80','pct90');
p.definedone();
call missing(id,vol,pct10,pct20,pct80,pct90,group);
end;
keep size dir date stk vol group;
set data1;
rc=pi.setcur(key: size);
do until(rc ne 0 or size ne id);
        if rc=0 then do;
                if .<vol<=pct10 then group=1;
                if pct10<vol<=pct20 then group=2;
                if pct20<vol<=pct80 then group=3;
                if pct80<vol<=pct90 then group=4;
                if pct90<vol then group=5;
end;
rc=pi.next();
end;
run;