怎么将sas宏变量转化成数据集？急！！

假设有一个宏变量a，怎么将a的值写到一个数据集中？
例如：
%let a='a1' 'a2' 'a3' 'a4' 'a5' 'a6' 'a7' 'a8' 'a9' 'a10' 'a11' 'a12' 'a13' 'a14' 'a15' 'a16';

希望转换成一个数据集a，一个变量为a，值为这16个值.
观测数可能超过2000个！
求解决方案？

1. 看行不行！
   
2. 
   
3. %macro ss();
   
4. %let a='a1' 'a2' 'a3' 'a4' 'a5' 'a6' 'a7' 'a8' 'a9' 'a10' 'a11' 'a12' 'a13' 'a14' 'a15' 'a16';
   
5. %if %sysfunc(exist(a)) %then %do;
   
6. proc delete data=a;
   
7. run;
   
8. %end;
   
9. %let i=1;
   
10. %do %while(%scan(&a,&i) ne );
    
11.   data s;
    
12.   a=%scan(&a,&i);
    
13.   output;
    
14.   run;
    
15. %if &i=1 %then %do;data a;length a $20;set s;run;%end;
    
16.     %else %do;
    
17.    proc append base=a data=s force;run;
    
18.    %end;
    
19.   %let i=%eval(&i.+1);
    
20. %end;
    
21. %mend;
    
22. options nomlogic nomprint;
    
23. %ss

复制代码

shenliang_111 发表于 2011-12-22 15:31

可以实现，但是当迭代次数多了，效率上有些慢，能不能在一个data step 中完成录入！

shenliang_111 发表于 2011-12-22 15:31

谢谢提醒，我在您的代码上加工了一下，问题解决了！

1. %macro ss();
   
2. %let a='a1' 'a2' 'a3' 'a4' 'a5' 'a6' 'a7' 'a8' 'a9' 'a10' 'a11' 'a12' 'a13' 'a14' 'a15' 'a16';
   
3. %if %sysfunc(exist(a)) %then %do;
   
4. proc delete data=a;
   
5. run;
   
6. %end;
   
7. %let count=%sysfunc(countw(&a));
   
8. %put &count;
   
9. data a;
   
10.         length a$10.;
    
11.         %do i=1 %to &count;
    
12.         a=%scan(&a,&i);
    
13.         output;
    
14.         %end;
    
15. run;
    
16. %mend;
    
17. options nomlogic nomprint;
    
18. %ss;

复制代码

1. %let a='a1' 'a2' 'a3' 'a4' 'a5' 'a6' 'a7' 'a8' 'a9' 'a10' 'a11' 'a12' 'a13' 'a14' 'a15' 'a16';
   
2. data a(drop=i);
   
3.     length a $10;
   
4.     i=1;
   
5.     a=scan("&a",i,"' ");
   
6.     do while(not missing(a));
   
7.         output;
   
8.         i+1;
   
9.         a=scan("&a",i,"' ");
   
10.     end;
    
11. run;

复制代码

懂得感恩最重要。别人给你解决了问题，应该及时给人加悬赏币。这样才有可持续性。

快给赏金，该被鄙视的家伙，intellectual property 应该受到保护。一言既出驷马难追方是男人。

hopewell 发表于 2011-12-22 22:58

请问能不能用input语句录入，提高效率，谢谢！

wingzero321 发表于 2011-12-23 15:20
请问能不能用input语句录入，提高效率，谢谢！

为什么input就会效率高？

soporaeternus 发表于 2011-12-23 15:25
为什么input就会效率高？

不知道，写出来比较一下效率，只能想到这两种方式，请问如用input 语句怎么写？怎么在input cards之后将宏变量的值录入！？