急问如何在sas中进行变量的批量重命名?

shiyiming

假设有一组变量a b c,想在这些变量的前面都加上一个相同的字符串,如变成d_a,d_b,d_c,应该如何编程啊?

shiyiming

data a;input a b c@@;cards;
1 2 3 ……
;run;
data b;set a(rename=(a=d_a b=d_b c=d_c));run;

shiyiming

data one;
input a b c d e f g h i j;
cards;
1 2 3 4 5 6 7 8 9 10
;
run;

ods listing close;
ods output position = list;
proc contents data = one varnum;
run;
ods listing;

proc sql noprint;
select put(max(num), 2.) into :num from list;
select variable into :var1-:var&num from list;
select "rename_"||variable into :new1-:new&num from list;
quit;

%macro rename;

%do i = 1 %to &num.;
&&var&i = &&new&i.
%end;

%mend rename;

proc datasets lib = work;
modify one;
rename %rename;
run;
quit;

shiyiming

data one;
label a='d_a' b='d_b' c='d_c';
input a b c @@;
cards;
1 2 3
3 2 4
4 7 9
;
proc print label;
run;

shiyiming

do you understand the question?

shiyiming

[code:e3044]
data one;
input a b c d e f g h i j;
cards;
1 2 3 4 5 6 7 8 9 10
;
run;

ods output position = list(keep=variable);
proc contents data = one;
run;

filename test "C:\test.sas";
data _null_;
file test;
set list;
put 'd_' variable;
run;[/code:e3044]

shiyiming

I think wislow's is more powful.

shiyiming

[code:92b5e]
假设你要重新命名字段的数据表为WORK.TEST,需要添加的前缀为"d_",代码为：
PROC SQL NOPRINT;
      SELECT TRIM(NAME)||"=d_"||TRIM(NAME)  INTO :STR_RENAME SEPARATED BY ' '
            FROM SASHELP.VCOLUMN
            WHERE LIBNAME="WORK" AND MEMNAME="TEST";
QUIT;
DATA WORK.TEST;
      SET WORK.TEST;
      RENAME &STR_RENAME;
RUN;
[/code:92b5e]

shiyiming

各位的想法都是很好的，其中winslow的程序在sas9.0中如果不做任何改动的话，改名成功，但如果换一个数据集的话就不行了，collon的程序则只能改变变量名，而不能和原先的数据集联系起来，请各位费心做进一步的指导，谢谢！

shiyiming

楼上的是赵本山?