awk合并操作

xdy1017714

我有一个文档是下面这样的，想按第一列匹配，合并成多列，如果没有就补0，第一个部分的第一列信息是全的，也就是a b c d 后面不会出现e
a 111
b 222
c 333
d 444

a 555
b 666

a 777
c 888

结果显示如下：
a 111 555 777
b 222 666 0
c 333 0 888
d 444 0 0


大神帮帮忙……

xdy1017714

合并我倒是会，但是不知道怎么补零。。

Herowinter

回复 1# xdy1017714
a 111
b 222
c 333
d 444

a 555
b 666

a 777
c 888
   
是1个文件的内容, 还是3个文件?

xdy1017714

是一个文件。空行分开的。

haooooaaa

1. awk -vk=1 '!NF{++k}NF{a[$1][k]=$2}END{for(i in a){s=i;for(j=1;j<=k;j++)s=s" "(j in a[i]?a[i][j]:"0");print s}}' file
   
2. a 111 555 777
   
3. b 222 666 0
   
4. c 333 0 888
   
5. d 444 0 0
   

复制代码

Herowinter

回复 5# haooooaaa

这思路很赞啊, 比我的好多了, 我都不好意思贴自己的了...
   

haooooaaa

如果有的是空两行， 有的是空三行，就有问题了，

改了一下，

1. awk -vRS= '{for(i=1;i<=NF;i+=2)a[$i][NR]=$(i+1)}END{for(i in a){s=i;for(j=1;j<=NR;j++)s=s" "(j in a[i]?a[i][j]:"0");print s}}' file

复制代码

非 4.0

1. awk -vRS= '{for(i=1;i<=NF;i+=2){a[$i]=a[$i] $(i+1)" ";b[$i]};for(i in a)a[i]=i in b?a[i]:a[i]"0 ";delete b}END{for(i in a)print i,a[i]}' file

复制代码

xdy1017714

回复 7# haooooaaa


大神！膜拜，想的太全面了，。爱你啊


   

jason680

$ awk '!NF{if(S)c++;S=0;next}{S=1;if(!a[$1]++)d[++t]=$1;b[$1,+c]=$2}END{for(n=1;n<=t;++n){s=d[n];for(m=0;m<=c;++m)s=s" "b[d[n],m]+0;print s}}' FILE | column -t
a  111  555  777
b  222  666  0
c  333  0    888
d  444  0    0