- data a;
- input a b;
- cards;
- 1 0.1
- 2 0.3
- 4 0.6
- 10 0.1
- 2 0.5
- 3 0.1
- 7 0.8
- 10 0.1
- 7 0.2
- 10 0.5
- ;
- run;
- data b;
- set a;
- if a=10 then tmp+1;
- run;
- data c(drop=tmp);
- set b;
- by tmp;
- if _n_>1 & first.tmp then grp=tmp-1;
- else grp=tmp;
- run;
- proc sql noprint;
- create table d as
- select grp,a,b,sqrt(sum((b-avg)**2)/(n-1)) as c from
- (select *,count(*) as n,avg(b) as avg from c group by grp) group by grp order by grp,a;
- quit;


雷达卡




京公网安备 11010802022788号







