如何求少的数据

zhaopingzi

a 1
a 2
a 4
a 6
a 8
a 19
b 2
b 5
b 7
b 10

结果
a 3,5,7,9-18
b 1,3-4,6,8-9

Looiml

1. awk '{a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}' a.txt

复制代码

a 3,5,7,9-18
b 1,3-4,6,8-9

wh7211

回复 1# zhaopingzi

1. cat 1
   
2. a 1
   
3. a 2
   
4. a 4
   
5. a 6
   
6. a 8
   
7. a 19
   
8. b 2
   
9. b 5
   
10. b 7
    
11. b 10
    
12. 
    
13. awk '{a[$1][$2]++;b[$1]=b[$1]>$2?b[$1]:$2}END{for(i in a){for(j=1;j<=b[i];j++){if(!a[i][j]){c=c?c:j;c=c<j?c:j;d=d>j?d:j}else{if(c&&c==d){e=e?e","c:c;c=j+1}else if(c&&c!=d){e=e?e","c"-"d:c"-"d;c=j+1}}};print i,e;c=d=e=""}}' 1
    
14. a 3,5,7,9-18
    
15. b 1,3-4,6,8-9

复制代码

zhaopingzi

回复 2# Looiml

1. 
   
2. $ awk '{a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}' a.txt
   
3. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
   
4. awk:       ^ syntax error
   
5. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
   
6. awk:                                                                                                ^ syntax error
   
7. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
   
8. awk:                                                                                                    ^ syntax error
   
9. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
   
10. awk:                                                                                                     ^ syntax error
    
11. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
    
12. awk:                                                                                                              ^ syntax error
    
13. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
    
14. awk:                                                                                                                               ^ syntax error
    
15. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
    
16. awk:                                                                                                                                                          ^ syntax error
    
17. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
    
18. awk:                                                                                                                                                                    ^ syntax error
    
19. awk: {a[$1][$2];if($2>m[$1])m[$1]=$2}END{for(i in a){printf i" ";f=0;for(j=1;j<=m[i];j++)if(!(j in a[i])){if(f==0)printf j;if(f==1)printf "-";f++}else{if(f>1)printf j-1;if(f>0&&j<m[i])printf ",";f=0}print ""}}
    
20. awk:                                                                                                                                                                                    ^ syntax error
    

复制代码

zhaopingzi

回复 3# wh7211

$ awk '{a[$1][$2]++;b[$1]=b[$1]>$2?b[$1]2}END{for(i in a){for(j=1;j<=b;j++){if(!a[j]){c=c?c:j;c=c<j?c:j;d=d>j?d:j}else{if(c&&c==d){e=e?e","c:c;c=j+1}else if(c&&c!=d){e=e?e","c"-"d:c"-"d;c=j+1}}};print i,e;c=d=e=""}}' a.txt
awk: {a[$1][$2]++;b[$1]=b[$1]>$2?b[$1]2}END{for(i in a){for(j=1;j<=b;j++){if(!a[j]){c=c?c:j;c=c<j?c:j;d=d>j?d:j}else{if(c&&c==d){e=e?e","c:c;c=j+1}else if(c&&c!=d){e=e?e","c"-"d:c"-"d;c=j+1}}};print i,e;c=d=e=""}}
awk:       ^ syntax error
awk: {a[$1][$2]++;b[$1]=b[$1]>$2?b[$1]2}END{for(i in a){for(j=1;j<=b;j++){if(!a[j]){c=c?c:j;c=c<j?c:j;d=d>j?d:j}else{if(c&&c==d){e=e?e","c:c;c=j+1}else if(c&&c!=d){e=e?e","c"-"d:c"-"d;c=j+1}}};print i,e;c=d=e=""}}
awk:                                                                                   ^ syntax error
awk: {a[$1][$2]++;b[$1]=b[$1]>$2?b[$1]2}END{for(i in a){for(j=1;j<=b;j++){if(!a[j]){c=c?c:j;c=c<j?c:j;d=d>j?d:j}else{if(c&&c==d){e=e?e","c:c;c=j+1}else if(c&&c!=d){e=e?e","c"-"d:c"-"d;c=j+1}}};print i,e;c=d=e=""}}
awk:                                                                                                                    ^ syntax error

wh7211

回复 5# zhaopingzi


看一下awk版本：

1. awk --version

复制代码

zhaopingzi

回复 6# wh7211

-bash-3.2# awk --version
GNU Awk 3.1.5
Copyright (C) 1989, 1991-2005 Free Software Foundation.

zhaopingzi

回复 3# wh7211

# awk --version
GNU Awk 4.0.2    这个可以

zhaopingzi

# awk --version
GNU Awk 4.0.2    这个可以

楼上两位的脚本都没问题

zhaopingzi

回复 2# Looiml
a c 1
a c 2
a c 4
a c 6
a c 8
a c 19
b d 2
b d 5
b d 7
b d 10


如何生成：
a c  3,5,7,9-18
b d 1,3-4,6,8-9