- data out;
- do i=1 to 100;
- j=ceil(200*(ranuni(0)));
- output;
- end;
- run;
- proc rank data=out out=shen group=4;
- ranks rank;
- var j;
- run;
- proc means data=shen noprint nway ;
- class rank;
- var j;
- output out=liang(drop=_type_ _freq_) mean=mean_rank;
- run;
- proc sort data=shen;
- by rank;
- run;
- data result;
- set shen(drop=mean_rank);
- by rank;
- if first.rank then set liang;
- run;


雷达卡
京公网安备 11010802022788号







