SAS如何实现同一列大小写一致性核查

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

如图所示，A3，A4，A5中同一列都是一致的，要么大写要么小写，A1和A2中不全为大写或小写。我想把A1，A2这两列找出来，该怎么解决呢？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：如何实现 大小写 一致性 如图所示

1. data test;
   
2.    input x $ y $ z $;
   
3. cards;
   
4. aa bb cc
   
5. Ac dd kk
   
6. a4C d6-9 abd0_4
   
7. ;
   
8. run;
   
9. 
   
10. data test1;
    
11.     set test;
    
12.         array original x y z;
    
13.         length flag1-flag3 $20.;
    
14.         array flag flag1-flag3;
    
15.         do over original;
    
16.             if prxmatch("/[a-z]/",original) and prxmatch("/[A-Z]/", original) then flag="mixed";
    
17.                 else if prxmatch("/[a-z]/",original) then flag="lower";
    
18.                 else flag="upper";
    
19.     end;
    
20. run;
    
21. 
    
22. proc freq data=test1;
    
23.     table flag1-flag3;
    
24. run;

复制代码

转置后，列变成行；
将同一行内所有字符型变量首尾相连；
使用函数判断是否同时有大写和小写字符；

1. data test;
   
2.    input (x y z) ($);
   
3. cards;
   
4. aa bb cc
   
5. Ac dd kk
   
6. a4C d6-9 abd0_4
   
7. ;
   
8. run;
   
9. 
   
10. proc transpose out = test1;
    
11.   var _all_;
    
12. run;
    
13. 
    
14. data _null_;
    
15.   set test1;
    
16.   if anylower(cats(of COL:)) and anyupper(cats(of COL:)) then put _NAME_ = ;
    
17. run;

复制代码