有条件的提取变量内的内容

急求
我想要提取这一列每个变量第一组数字前的全部文本信息；这些文本信息生成新的一列变量；举的例子，第一个变量想提取的文本是“Commerzbank",第二个变量想提取的是”United Bank Switzerland AG".这一列有差不多4万个数据，提取出来的数据有很多是重复的，不用管，这要可以和这列一一对应就可以了。求大神指点，万分感谢！！

甲氟喹3 发表于 2018-3-5 17:41
你好 我写了这样的一个code，
data want2;
set want1;

1. data test;
   
2.    input expanded_name :&$100.;
   
3. cards;
   
4. asdf123
   
5. asdfasdf456
   
6. asdfput
   
7. asdfasdf put
   
8. ;
   
9. run;
   
10. 
    
11. data want;
    
12.    set test;
    
13.    digit=anydigit(expanded_name);
    
14.    if digit>0 then string=substrn(expanded_name,1,digit-1);
    
15.    else string=expanded_name;
    
16. run;
    
17. 
    
18. data want1;
    
19.    set want;
    
20.    string1=substr(string,1,find(string,"put")-1);
    
21. run;

复制代码

1. data test;
   
2.    input expanded_name :$100.;
   
3. cards;
   
4. asdf123
   
5. asdfasdf456
   
6. ;
   
7. run;
   
8. 
   
9. data want;
   
10.    set test;
    
11.    digit=anydigit(expanded_name);
    
12.    string=substrn(expanded_name,1,digit-1);
    
13. run;
    
14. 
    
15. proc print;
    
16. run;

复制代码

l1i2n3i4n5g 发表于 2018-3-5 16:28

谢谢你！ 我去试一下先

l1i2n3i4n5g 发表于 2018-3-5 16:28

你好呀 现在有这样一个问题，就是有大概100个数据，这个变量里没有数字，你可不可以教我一下怎么写呢，比如有些规律是在“put“这个单词之前，有的也没有是什么规律。。

”Goldman Sachs Put Dow Jones Industrial Index Warrants Early“
”Goldman Sachs Put-Deutsche Aktienindex Index Warrants Early“
”Goldman Sachs Put Dow Jones Industrial Index Warrants Early“
”Goldman Sachs Deutsche Aktienindex Index Warrants Early“
比如这四个我想提取的信息都是”Goldman Sachs“，请问有什么办法呀？

甲氟喹3 发表于 2018-3-5 17:16
你好呀 现在有这样一个问题，就是有大概100个数据，这个变量里没有数字，你可不可以教我一下怎么写呢，比 ...

先判断put的位置，然后substr之前部分就好了

l1i2n3i4n5g 发表于 2018-3-5 17:23
先判断put的位置，然后substr之前部分就好了

你好 我写了这样的一个code，
data want2;
set want1;
A=compress(Expanded_Name);
B=substr(A,find(A,"put"));run;

但是跑不出来，想请问有没有往前取的substr呢；就是往前取所有文本信息，因为我也不知道位数，谢谢！

1. data have;
   
2. input len $char1000. @@;
   
3. cards;
   
4. 
   
5. sd1232sdsdsd0912
   
6. dsds1232sd09sss
   
7. 12324/1232\sdssds
   
8. ;
   
9. run;
   
10. 
    
11. data want;
    
12.         set have;
    
13.         position1 = prxmatch('/([0-9])+/',len);       
    
14.         position2 = prxmatch('/([^0-9])+/',substr(len,position1));       
    
15.         want=substr(len,position1,position2-1);
    
16. run;

复制代码

这个问题可以使用正则表达式，如上代码，可以实现找出第一个数字串

l1i2n3i4n5g 发表于 2018-3-6 09:30

好的好的 谢谢你！

cashes93 发表于 2018-3-5 20:42
这个问题可以使用正则表达式，如上代码，可以实现找出第一个数字串

好的 谢谢 我试一下