%macro ans;
data _null_;
set equation end=last;
i+1;
ii=left(put(i,2.));
call symput('eq'||ii,eq);
if last then call symput('total',ii);
run;
data equation1;
%do ii=1 %to &total;
ans=%eval(&&eq&ii);
output;
%end;
run;
data equation;
set equation;
id=_n_;
run;
data equation1;
set equation1;
id=_n_;
run;
proc sql;
create table equation3 as select eq,ans from equation,equation1
where equation.id=equation1.id;
quit;
%mend ans;
%ans
扫码加好友，拉您进群
全部版块
我的主页
收藏
