awk文本处理，算是列转行，但是有些条件

messud4312

a1        b1        c1        1        0.0
a1        b1        c2        2        826.0
a1        b1        c3        3        170.0
a1        b1        c4        4        375.0
a2        b1        c1        5        0.0
a2        b1        c3        6        5.0
a2        b1        c4        7        826.0
a2        b1        c5        8        170.0
a3        b1        c1        9        0.0
a3        b1        c2        10        375.0
a3        b1        c3        11        826.0
a3        b1        c4        12        170.0
a3        b1        c5        13        0.0
有上面数据 第一列+第二列 作为一个id，以第三列为判断依据，重组数据。第三列共5个值，（c1,c2,c3,c4,c5）
根据第三列的值把4,5列的值列转行
转换后的格式如下（便于说明，以|隔开）
a1  b1 |  c1  c2  c3  c4  c5 | c2  c3  c4
第一部分 为 1,2列组合id
第二部分 为 c1至c5的顺序排列的第四列的值，若无则置0
第三部分 为 c2至c4的顺序排列的第五列的值，若无则置0

希望结果如下：
a1  b1  1  2    3    4    0    826.0  170.0  375.0
a2  b1  5  0    6    7    8    0         5.0     826.0
a3  b1  9  10  11  12  13   375.0  826.0  170.0

rdcwayx

1. awk 'BEGIN{l=split("c1 c2 c3 c4 c5",a," " )}
   
2. {str=$1 FS $2 FS $3;b[str]=$4;c[str]=$5;d[$1 FS $2]}
   
3. END{ for (i in d)
   
4.          { printf i FS
   
5.            for (j=1;j<=l;j++) printf (b[i FS a[j]]=="")?"0" FS : b[i FS a[j]] FS
   
6.            for (j=2;j<=4;j++) printf (c[i FS a[j]]=="")?"0" FS : c[i FS a[j]] FS
   
7.            printf RS               
   
8.          }
   
9.     }' infile |sort -n
   
10. 
    
11. a1 b1 1 2 3 4 0 826.0 170.0 375.0
    
12. a2 b1 5 0 6 7 8 0 5.0 826.0
    
13. a3 b1 9 10 11 12 13 375.0 826.0 170.0
    

复制代码

klainogn

1. awk '{t1=$1FS$2;t2=t1""FS$3;a[t1];b[t2]=$4;c[t2]=$5}END{for(i in a){printf i" ";for(j=1;j<6;j++){printf("%-2d ",b[i""FS"c"j])}for(k=2;k<5;k++)printf("%-6.1f ",c[i""FS"c"k]+0);print ""}}' urfile | sort
   
2. 
   
3. a1 b1 1  2  3  4  0  826.0  170.0  375.0
   
4. a2 b1 5  0  6  7  8  0.0    5.0    826.0
   
5. a3 b1 9  10 11 12 13 375.0  826.0  170.0

复制代码

yestreenstars

1. [root@localhost ~]# cat i
   
2. a1        b1        c1        1        0.0
   
3. a1        b1        c2        2        826.0
   
4. a1        b1        c3        3        170.0
   
5. a1        b1        c4        4        375.0
   
6. a2        b1        c1        5        0.0
   
7. a2        b1        c3        6        5.0
   
8. a2        b1        c4        7        826.0
   
9. a2        b1        c5        8        170.0
   
10. a3        b1        c1        9        0.0
    
11. a3        b1        c2        10        375.0
    
12. a3        b1        c3        11        826.0
    
13. a3        b1        c4        12        170.0
    
14. a3        b1        c5        13        0.0
    
15. [root@localhost ~]# awk '{t=$1"\t"$2;sub(/c/,"",$3);a[t,$3]=$4;b[t,$3]=$5;c[t]}END{for(i in c){printf i;for(j=1;j<=5;j++){if(a[i,j]=="")a[i,j]=0;printf "\t"a[i,j]}for(j=2;j<=4;j++){if(b[i,j]=="")b[i,j]=0;printf "\t"b[i,j]}print ""}}' i | sort
    
16. a1      b1      1       2       3       4       0       826.0   170.0   375.0
    
17. a2      b1      5       0       6       7       8       0       5.0     826.0
    
18. a3      b1      9       10      11      12      13      375.0   826.0   170.0
    
19. [root@localhost ~]#

复制代码

yestreenstars

回复 2# rdcwayx

本帖最后由 rdcwayx 于 2013-11-07 10:49 编辑

版主是来自未来的~

   

yestreenstars

回复 3# klainogn
+0不错，省了一个if语句，学习了~

   

messud4312

都不错，基本思路是一致，在这统一谢个

vcdtwo

测试编辑时间显示

li0924

1. awk '{split($3,a,"");n=a[2];if(t<=n){b[n]=$4;c[n]=$5}else{printf s FS;{for(i=1;i<=5;i++)printf (i in b)?b[i] FS:0 FS;for(j=2;j<=4;j++)printf (j in c)?c[j] FS:0 FS;print "";delete b;delete c;b[n]=$4;c[n]=$5}}t=a[2];s=$1FS$2}'

复制代码

1. a1  b1  1  2   3   4   0   826.0  170.0  375.0
   
2. a2  b1  5  0   6   7   8   0      5.0    826.0
   
3. a3  b1  9  10  11  12  13  375.0  826.0  170.0

复制代码

elu_ligao

1. [redhat@localhost 1107]$ cat col.awk
   
2. #! /bin/awk -
   
3. 
   
4. 
   
5. {
   
6.         t = a[$1FS$2]?a[$1FS$2]:$1FS$2
   
7.         b[$3]
   
8.         c[t FS $3] = $4
   
9.         d[t FS $3] = $5
   
10. }
    
11. END{
    
12.         l=asorti(a)
    
13.         asorti(b)
    
14.         for (i=1; i<=l; ++i){
    
15.                 printf a[i]
    
16.                 for (j=1; j<=5; ++j){
    
17.                         printf FS
    
18.                         printf c[a[i] FS b[j]]?c[a[i] FS b[j]]:0
    
19.                 }
    
20.                 for (k=2; k<=4; ++k){
    
21.                         printf FS
    
22.                         printf d[a[i] FS b[k]]?d[a[i] FS b[k]]:0
    
23.                 }
    
24.                 print ""
    
25.         }
    
26. }
    
27. [redhat@localhost 1107]$ awk -f col.awk col5 | column -t
    
28. a1  b1  1  2   3   4   0   826.0  170.0  375.0
    
29. a2  b1  5  0   6   7   8   0      5.0    826.0
    
30. a3  b1  9  10  11  12  13  375.0  826.0  170.0

复制代码