纠结了好久，求大神

reyleon

回复 8# xierongzhong


    靠!  暗黑西游是 4399 开发的啊,以为是 暗黑西游记 去了!我勒个去

1. [root@centos6-1 ~]#
   
2. [root@centos6-1 ~]# cat file
   
3. 神魔        S126
   
4. 神魔        S125
   
5. 神魔        S123
   
6. 神魔        S109
   
7. 神魔        S108
   
8. 神魔        S107
   
9. 神魔        S106
   
10. 御剑        S125
    
11. 御剑        S123
    
12. 御剑        S109
    
13. 御剑        S108
    
14. 御剑        S107
    
15. 御剑        S106
    
16. 暗黑西游        S15
    
17. 暗黑西游        S14
    
18. 暗黑西游        S10
    
19. 暗黑西游        S9
    
20. 暗黑西游        S2
    
21. [root@centos6-1 ~]#
    
22. [root@centos6-1 ~]#
    
23. [root@centos6-1 ~]# sort -tS -k2,2n file | awk -f f.awk
    
24. 御剑 S106-109,S123,S125
    
25. 神魔 S106-109,S123,S125-126
    
26. 暗黑西游 S2,S9-10,S14-15
    
27. [root@centos6-1 ~]#
    
28. [root@centos6-1 ~]# cat f.awk
    
29. #!/bin/awk
    
30. 
    
31. { a[$1]=a[$1]?a[$1]","$2:$2 }
    
32. 
    
33. END {
    
34.         for(i in a){
    
35.                 for(n=1;n<=split(a[i],b,",");n++){
    
36.                         m=0
    
37.                         r=substr(b[n],1,1);t=substr(b[n],2);while(r""++m+t==b[n+m])continue;
    
38.                         --m;if(m!=0)b[n]=b[n]"-"m+t
    
39.                         s=s?s","b[n]:b[n]
    
40.                         n+=m
    
41.                 }
    
42.                 print i,s;s=""
    
43.         }
    
44. }
    
45. [root@centos6-1 ~]#
    

复制代码

ly5066113

回复 1# xierongzhong


try:

1. awk -F '[ \tS]+' '{a[$1]=a[$1]?$2","a[$1]:$2}END{for(i in a){l=split(a[i],A,",");printf i"\tS"A[1];for(j=2;j<=l;j++){if(A[j]==A[j-1]+1){if(A[j]!=A[j+1]-1)printf "-S"A[j];continue;}printf ",S"A[j]}print ""}}' file

复制代码

tyw09

回复 12# ly5066113


    神魔    S106-S109,S123,S13,S12,S10,S125
御剑    S106-S109,S123,S125

不行
S12-S13没合并

ly5066113

回复 13# tyw09


楼主的数据是严格降序排列的，你的测试数据不是。

tyw09

回复 14# ly5066113


#!/usr/bin/env python
# -*- coding: utf-8 -*-
#  tanyewei@gmail.com
#  2014/01/15 14:15
import sys
from itertools import *
from operator import itemgetter


def parse(filename):
    d = {}
    for line in open(filename, 'r'):
        _line = line.split()
        d.setdefault(_line[0], []).append(_line[1])

    for key in d.keys():
        data = sorted(map(lambda x: int(x[1:]), d[key]))
        sys.stdout.write(key + " ")

        for k, g in groupby(enumerate(data), lambda (i, x): i - x):
            ret = map(itemgetter(1), g)
            if len(ret) > 1:
                sys.stdout.write("S%d-%d," % (ret[0], ret[-1]))
            elif len(ret) == 1:
                sys.stdout.write(str("S%s") % ret[0] + ",")
        sys.stdout.write('\n')


if __name__ == "__main__":
    filename = sys.argv[1]
    parse(filename)


保存为1.py chmox +x 1.py
./1.py 文件名

iamhere2007

[ 本帖最后由 iamhere2007 于 2014-01-15 17:26 编辑 ]

#说明：同一类$1,$2必须递减;如果$2非递减,可以用sort -t"S" -k2nr data.txt使得$2递减
#优点：不同类$1可以混合
#the array style of prev,cont,start is for independently dealing with every category of $1
{
   if(substr(prev[$1],2)-1==substr($2,2))
   {
          if(!cont[$1])  #! includes two cases: cont[$1] is empty or 0
          {
             start[$1]=substr(prev[$1],2);
          }
          cont[$1]++;
   }
   else #when break occur,the things you need to do
   {
          if(cont[$1])
          {
              arr[$1]=arr[$1] "S" start[$1]-cont[$1] "-" start[$1] ",";
              cont[$1]=0;   #cont is not like start, you must make it zero explicitly
          }
          arr[$1]=arr[$1] $2 ",";
   }
   prev[$1]=$2;    #keep the previous $2
}
END{
      for(i in arr)
      {
          if(cont[i]>0)       #process the last continuous
          {
              arr[i]=arr[i] "S" start[i]-cont[i] "-" start[i] ",";
          }
          print i": " substr(arr[i],1,length(arr[i])-1);  #remove the last comma
      }
}

LikeLx

回复 8# xierongzhong

1. sub(/-[^,]*-/,"-",a[i])

复制代码

改成这样就可以了

   

elu_ligao

1. sort -t'S' -k2n file | awk '{sub(/^S/,"",$2);a[$1]=a[$1]?a[$1]FS$2:$2}END{for(i in a){l=split(a[i],sa);printf i":";min=sa[1];for(j=2;j<=l;++j){if(sa[j-1]+1!=sa[j]){printf "S%s,",min==sa[j-1]?min:min"-"sa[j-1];min=sa[j]}}if(min==sa[j-1])printf "S%s",sa[j-1];if(sa[j-1]-1==sa[j-2])printf "S%s-%s",min,sa[j-1];print ""}}'

复制代码

回复 1# xierongzhong


   

expert1

http://bbs.chinaunix.net/thread-3620300-2-1.html
或者去我blog看，都是同样问题。

reb00t

1. sort -k1,1 -k2,2n  -tS  123.txt |awk  -F'S' -f 1.sh
   
2. 御剑            S106-109,S123,S125
   
3. 暗黑西游                S2,S9-10,S14-15
   
4. 神魔            S106-109,S123,S125-126
   
5. ::::::::::::::
   
6. 123.txt
   
7. ::::::::::::::
   
8. 神魔        S126
   
9. 神魔        S125
   
10. 神魔        S123
    
11. 神魔        S109
    
12. 神魔        S108
    
13. 神魔        S107
    
14. 神魔        S106
    
15. 御剑        S125
    
16. 御剑        S123
    
17. 御剑        S109
    
18. 御剑        S108
    
19. 御剑        S107
    
20. 御剑        S106
    
21. 暗黑西游        S15
    
22. 暗黑西游        S14
    
23. 暗黑西游        S10
    
24. 暗黑西游        S9
    
25. 暗黑西游        S2
    
26. ::::::::::::::
    
27. 1.sh
    
28. ::::::::::::::
    
29. #!/bin/awk
    
30. 
    
31. NR==1{p1=$1;p2=$2;s=$1"\tS"$2}NR>1{
    
32. 
    
33.         if($1==p1){
    
34.                 if($2==p2+1){
    
35.                         s=s"-"$2
    
36.                                         }else{
    
37.                         
    
38.                         s=s",S"$2}
    
39.                         
    
40.                         p1=$1;p2=$2
    
41.         }else {
    
42.                         gsub(/-[^,]*-/,"-",s);print s;
    
43.                
    
44.                         p1=$1;p2=$2;
    
45.                         s=$1"\tS"$2
    
46.                         }
    
47.                         
    
48.         }END{gsub(/-[^,]*-/,"-",s);
    
49.         
    
50.                 print s}
    
51. 
    

复制代码