求一个数值统计的shell

czm21

文本内容如下：

1   4   9
1   6   8
0   1   9
0   6   7

要求输出：

1(2)   4(17)   9(33)
1(2)   6(17)   8(33)
0(2)   1(17)   9(33)
0(2)   6(17)   7(33)

注：括号内是该列数值的和

谢谢各位大神！

reyleon

1. awk 'NR==FNR{for(i=0;i++<NF;)a[i]+=$i;next}{s="";for(i=0;i++<NF;){t=sprintf("%s(%s)",$i,a[i]);s=length(s)?s" "t:t}print s}' file file

复制代码

czm21

回复 2# reyleon

谢谢大神！之前一直困扰我的是awk只能遍历一遍文件，原来写两个file就可以解决了，太巧妙了！


   

reyleon

1. awk '{for(i=0;i++<NF;){a[NR,i]=$i;b[i]+=$i}}END{for(i=0;++i<=NR;){s="";for(j=0;j++<NF;){t=sprintf("%s(%s)",a[i,j],b[j]);s=length(s)?s" "t:t}print s}}' file

复制代码

czm21

回复 4# reyleon
非常感谢，精益求精啊！佩服佩服！

   

reyleon

回复 5# czm21

当文件比较大时: 第一个不会占用什么内存, 且性能会高很多, 第二个会占用大量内存,性能低下   

czm21

回复 6# reyleon
谢谢回复！
如果文件比较大，第一个需要遍历两个文件，虽然内存占用少，但读取硬盘频繁，速度慢一些。实际中我打算在服务器上跑，感觉第二个靠谱一些，可以牺牲一些内存，降低硬盘读取，提高分析的速度。
   

reb00t

说好一起装逼的，特么全部被你装了~

@reyleon

czm21

回复 8# reb00t

可以继续装，哈哈
   

关阴月飞

回复 1# czm21

1. awk '{for(i=0;i++<NF;){a[i]+=$i;b[NR,i]=$i}}END{for(n=0;n++<NR;){for(i=0;i++<NF;)printf b[n,i]"("a[i]")  ";print pf}}'  urfile

复制代码