求大家看一段程序哪里有问题

小鳄鱼a

1423

收藏 2014-09-15

悬赏 30 个论坛币已解决

复制代码

log日志.rar

大小:869 Bytes

马上下载

本附件包括：

log日志.log

最佳答案

davil2000 查看完整内容

%macro df_lag(data= ,index=, n=, delim=); %let i=1; %do %while(%scan(%quote(&index), &i, %quote(&delim)) ne ); %let Nindex=%scan(%quote(&index),&i, %quote(&delim)); %let j=1; %do j=1 %to &n; data &data; set &data; lg&j&Nindex=lag&j.(&Nindex); run; %end; %let i=%eval(&i+1); %end; %mend; options symbolgen; %df_lag(data=sashelp.prdsale,index=%str(predict,actual ...

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

davil2000

2014-9-15 19:44:13

%macro df_lag(data= ,index=, n=, delim=);

%let i=1;
%do %while(%scan(%quote(&index), &i, %quote(&delim)) ne );
%let Nindex=%scan(%quote(&index),&i, %quote(&delim));
%let j=1;
%do j=1 %to &n;
data &data;
set &data;
lg&j&Nindex=lag&j.(&Nindex);
run;
%end;

%let i=%eval(&i+1);
%end;

%mend;

options symbolgen;
%df_lag(data=sashelp.prdsale,index=%str(predict,actual,year),n=3, delim=',');