Question

这是我的代码：

libname Project 'XXX'; run;
%let dname = q1males;
%let Gender = 'Male';
%let samp = q1msamp;
%let stats = Malestats;


data project.data1; set project.data;
id = _n_;
run;



data project.&dname; set project.data1; 
if Gender = &Gender;
run;
%macro question;
%do i = 1 %to 5;

proc surveyselect data = project.&dname method = SRS sampsize = 27 
                out = project.&samp;
                id _all_;
run;

proc print data = project.&samp;
run;

proc sql;
create table project.&stats&i as
select 'Weight',
avg(Weight) as Mean format 10.2 label 'Mean Weight',
std(Weight) as Std format 10.2 label 'Std. Dev Weight'
from project.&samp;
QUIT;
%end;
%mend question;
%question;

%do j = 1 %to 5;
data project.merged&j;
merge project.femalestats&j project.malestats&j;
by _Tema003 Mean Std;
run;

除了最后6行之外，一切正常，从％do j = 1％到5开始。我为女性和男性数据集运行前面的代码两次，最后6行我试图合并女性和男性数据集（例如：project.Femalestats1与project.Malestats1合并为一个新的数据集，project.merged1 。）我的日志没有显示错误，但我也没有得到合并的数据集。我尝试了令人失望的结果的proc sql。

有任何帮助吗？谢谢！

Answer 1

您不能在宏之外使用宏循环。像处理question宏一样，在宏中包含最后一行。

此外，您需要结束循环：

%macro myloop();
   %do i=1 %to 5;

      <stuff>

   %end
%mend;

%myloop;

SAS的麻烦循环

1 个答案: