请教一个字符串如何实现内部排序

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

各位大侠，请教

string=“mns abc  pmq”

这样一个字符串，用什么语句可以让它内部按首字母排序呢？

变成 “abc mns pmq”这样子？


谢谢啦！

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：如何实现 字符串 string tring 各位大侠 请教 字符

先扯成三个子字符，排序后又组成一个新字符

1# 北海之秋

LZ，看了你的问题，俺也没有太好的法子，不过下面有一个笨办法仅供参考，权当抛砖引玉吧！程序如下：

data a;
string="mns abc  pmq";
f=scan(string,2,' ');
m=scan(string,1,' ');
l=scan(string,3);
new_string=trim(f)||' '||trim(m)||' '||trim(l);
proc print;
var new_string;
run;

下面是运行后的结果：

            
                                       Obs    new_string

                                        1     abc mns pmq

data x;
    x="mns abc pmq";
        array word(3) $;
        do i=1 to 3;
       word(i)=scan(x,i);
        end;
        call sortc(of word1-word3);
    new_x=catx("",of word1-word3);
run;

9.2 都这么先进啦。sortc这种函数。。。。梦寐以求
给个9.1.3做法：

1. data a;
   
2.         infile cards dlm=",";
   
3.         input s:$30. ;
   
4.         cards;
   
5.         mns abc pmq
   
6.         abc blk bad fda zdfdf
   
7.         jkla cffd bddfd
   
8.         ;
   
9. run;
   
10. 
    
11. data b(drop= i rc c k);
    
12.         declare hash h(ordered: "A");
    
13.         declare hiter iter('h');
    
14.         h.definekey('k');
    
15.         h.definedone();
    
16. 
    
17.         set a;
    
18.         c=count(strip(s),'')+1;
    
19.         do i=1 to c;
    
20.                 k=scan(strip(s),i);
    
21.                 h.add();
    
22.         end;
    
23. 
    
24.         rc=iter.first();
    
25.         new_s=s;
    
26.         call missing(new_s);
    
27.         do while (rc = 0);
    
28.                 new_s=catx("",strip(new_s),k);
    
29.                 rc=iter.next();
    
30.         end;
    
31. 
    
32.         h.delete();
    
33. run;

复制代码

利用hash对key自动排序，不过9.1.3的hash还是很低端的。没有类似clear这类清空所有元素的方法。所以不得不每次delete。

5# yatming
9.1也可以用

6# pobel
邪恶的sashelp，害人不浅。。。。。