怎么隔列相加，求大神帮助

mazuju099

文本1如下：
-26.36850000   0.05910000  -0.05910000   0.00412600  -0.00412600   0.00000000  -0.00000000
-26.34850000   0.06480000  -0.06480000   0.00473500  -0.00473500   0.00000000  -0.00000000


处理后希望得到一个新文本2，文本2保留文本1的第一列，第二列为文本1的2,4,6,8列...相加；第三列为文本1的3,5,7列，，相加
-26.36850000   $2+$4+$6
-26.34850000   $3+$5+$7

moperyblue

文本1只有两行? 每行的列数大于8?

mazuju099

文本有很多行，列数也不止8列，第一列复制，然后把第二列开始的所有偶数列相加作为新文本的第二列，第三列开始的所有奇数列相加作为新文本的第三列。不知道我讲的您清楚了吗

mazuju099

回复 3# mazuju099

文本有很多行，列数也不止8列，第一列复制，然后把第二列开始的所有偶数列相加作为新文本的第二列，第三列开始的所有奇数列相加作为新文本的第三列。不知道我讲的您清楚了吗

sunzhiguolu

1. perl -anle '($a,$b,$c)=shift(@F);$_%2?($c+=$F[$_]):($b+=$F[$_])for(0..$#F);print"$a $b $c"' f

复制代码

jason680

回复 1# mazuju099

$ awk '{S3=S2=0;for(n=2;n<=NF;n+=2){S2+=$n;S3+=$(n+1)}print $1,S2,S3}' FILE
-26.36850000 0.063226 -0.063226
-26.34850000 0.069535 -0.069535

jcdiy0601

1. awk '{jishu=oushu=0;for(i=2;i<=NF;i++)if(i%2==1){jishu+=$i}else{oushu+=$i};print $1,oushu,jishu}' file

复制代码

moperyblue

1. awk '{a=b=0;for(i=1;i++<NF;)i%2?b+=$i:a+=$i;print $1,a,b}'

复制代码

mazuju099

回复 5# sunzhiguolu

感谢感谢。