也可以,我不习惯用means而已
修改如下
/*按企业名和时间排序*/
proc sort data=a;
by coname date;
run;
/*将各企业按时间计数*/
data a;
set a;
by coname date;
if first.coname then n1=1;
else n1+1;
run;
/*计算各企业的最大笔数*/
proc sql;
create table b as
select distinct *,max(N1) as nn
from a group by coname;
quit;
/*取最大笔数大于5的前5年数据*/
proc sql;
create table c as
select *
from b
where nn>5 and n1<6;
quit;
/*求中位数*/
proc means data=c;
var dp;
by coname;
output out=d median=med;
run;



雷达卡




京公网安备 11010802022788号







