求教！如何从不统一格式地区变量中将 省和市 提出 分列为两列变量？

公司所在地
北京市
广东省深圳市
深圳市
广东省珠海市某某县
内蒙古自治区呼和浩特市

如上例子 现在想通过scan函数实现
求大神指教用什么程序可以实现？ 或者有什么好办法？ 感谢！

1. option validvarname=any;
   
2. data test;
   
3. input 公司所在地 : $100.;
   
4. cards;
   
5. 北京市
   
6. 广东省深圳市
   
7. 深圳市
   
8. 广东省珠海市某某县
   
9. 内蒙古自治区呼和浩特市
   
10. ;
    
11. run;
    
12. 
    
13. data test1;
    
14.         set test;
    
15.         if kindex(公司所在地,'省') or kindex(公司所在地,'自治区') then
    
16.         "省/自治区"n=kscan(公司所在地,1,'省''自治区');
    
17. 
    
18.         if kindex(公司所在地,'市') then do;
    
19.                 if kindex(公司所在地,'省') or kindex(公司所在地,'自治区') then
    
20.                         市=kscan(公司所在地,2,'省''自治区''市');
    
21.                 else 市=kscan(公司所在地,1,'省''自治区''市');
    
22.         end;
    
23. run;
    
24. proc print;
    
25. run;

复制代码

l1i2n3i4n5g 发表于 2017-9-10 10:46

谢谢~请问怎么该能使 北京市 也列在 省 列中？

data test2;
        set test;
        pattern='/((.*)(省|自治区))?((.*)市)?/o';
        pattern_id=prxparse(pattern);
        if prxmatch(pattern_id,公司所在地) then do;
                "省/自治区"n=prxposn(pattern_id,2,公司所在地);
                市=prxposn(pattern_id,5,公司所在地);
        end;
run;

迷人的小鲁班 发表于 2017-9-10 11:01
谢谢~请问怎么该能使 北京市 也列在 省 列中？

单独做个判断语句不就行了