求教如何对一个含有N行N列的文件进行每5列求和

蓝色未央

file如下：(注：有n行n列，每5列先求和，最后剩下不足5列的也求和)

A B C D E F G H I
B 0 1 2 3 7 9 10 11
C 0 2 7 9 3 0 4 8
D 9 39 90 67 7 8 0 1
E 78 25 78 12 8 3 2 1
.
.
.
想要得到的结果是(每5列求和，最后剩余不足5列也求和)：
B 13 30
C 18 15
D 205 16
E 193 14

谢谢

moperyblue

1. awk '$2~/[0-9]+/{printf $1;s=0;for(i=2;i<=NF;i++){s+=$i;if(i==NF){print FS s}else if((i-1)%5==0){printf FS s;s=0}}}' file

复制代码

1cpuer

回复 2# moperyblue

# bash:root [11457] 2019-10-20 16:20:55 1571559655 /media/buku/dic1-d # echo {1..20} | awk '$2~/[0-9]+/{printf $1;s=0;for(i=2;i<=NF;i++){s+=$i;if(i==NF){print FS s}else if((i-1)%5==0){printf FS s;s=0}}}'
1 20 45 70 74


# bash:root [11458] 2019-10-21 07:53:15 1571615595 /media/buku/dic1-d # echo {1..20} | awk '$2~/[0-9]+/{printf $1;s=0;for(i=2;i<=NF;i++){s+=$i;if(i==NF){print FS s}else if((i-0)%5==0){printf FS s;s=0}}}'
1 14 40 65 90


1+2+3+4+5==(15+6)-1
i==2
(2-1)%5==0
if((i-1)%5==0) #----为什么==0

# bash:root [11465] 2019-10-21 08:39:45 1571618385 /media/buku/dic1-d # echo {1..20} | awk '$2~/[0-9]+/{printf $1;s=0;for(i=2;i<=NF;i++){s+=$i;if(i==NF){print FS s}else if((i-1)%5){printf FS s;s=0}}}'
1 2 3 4 5 13 8 9 10 23 13 14 15 33 18 19 20
# bash:root [11491] 2019-10-21 08:59:08 1571619548 /media/buku/dic1-d # echo $[2+3+4+5+6]
20


# bash:root [11466] 2019-10-21 08:44:34 1571618674 /media/buku/dic1-d # echo {1..20} | awk '$2~/[0-9]+/{printf $1;s=0;for(i=2;i<=NF;i++){s+=$i;if(i==NF){print FS s}else if((i-1)%5==1){printf FS s;s=0}}}'
1 2 25 50 75 57