1

我有四个逗号分隔的文件:mar2009.txt、mar2010.txt、mar2011.txt 和 mar2012.txt

我正在尝试清理我的库并动态导入这些数据集:

libname my "C:\Users\Owner\Desktop\SAS\";

data A; // I do not this step but if I do not use it the the "do" becomes red in color
do i = 2009 to 2012;

proc datasets library=my;
delete mar.&i;
run;

proc import out=my.mar.&i datafile="C:\Users\Owner\Desktop\SAS\mar.&i.txt" dbms=dlm replace;
delimiter='2c'x;
getnames=yes;
datarow=2;
run;

end;
run;
4

1 回答 1

2

要从根本上回答您的问题,您不需要仅仅因为重新导入数据集就“清理”它;它将自动被替换。

您可以编写一个宏来执行导入,如下所示:

%macro import_myfile(i=);
proc import file="...whatever...\mar&i.txt" out=mar_&i. dlm=',' replace;
run;
%mend import_myfile;

%import_myfile(i=2009);
%import_myfile(i=2010);
%import_myfile(i=2011);
%import_myfile(i=2012);

您可以编写一个循环来从 2009 年到 2012 年执行它,但如果它只是四次运行,则不值得编写代码。如果您有一个动态数字要执行,并且这些值在数据集中,您可以这样做:

data data_torun;
input filenum;
datalines;
2009
2010
2011
2012
;;;;
run;

proc sql;
select cats('%import_myfile(i=',filenum,')') into :listtorun 
 separated by ' '
 from data_torun;
quit;

&listtorun.;
*this will become the same four calls as above;

当数据可能发生变化时(即使在循环中),通常最好将此类数据保存在数据集形式而不是代码中。这样,您可以将其存储在文本文件中并读入。

于 2013-07-31T20:12:14.440 回答