Eternal0601 发表于 2013-12-29 17:33 
data final;
set raw;
_mean=mean(var1-var3);
/*前提是连续几行*/
%let first=2;
%let last=3;
data b;
set a;
array raw {3} var1-var3;
array value {&first.:&last.,3} _temporary_;
if &b le _n_ le &a. then do;
do j=1 to dim(raw);
value(_n_,j)=raw(j);
put value(_n_,j);
end;
end;
if _n_=&last. then do;
_mean=mean(of value(*));
_var=var(of value(*));
end;
run;