计算文件中每一列的总和

在具有以空格''分隔的不同列数的文件中，如何计算列之和。一个例子将表明需要：

File A:

1 2 
2 3
4 5 6 
1 1 1 5

那么输出将是：

• 对于列1（1 + 2 + 4 + 1）= 8
• 第2列为11
• 第3列是7
• 第4列是5

使用 awk

awk '{for (i=1;i<=NF;i++) sum[i]+=$i;}; END{for (i in sum) print "for column "i" is " sum[i];}' FileA
for column 1 is 8
for column 2 is 11
for column 3 is 7
for column 4 is 5

使用numsum该任务和数据处理和输出结果之间的分离。

安装num-utils，我们需要numsum

sudo apt-get install num-utils

然后开始

numsum -c <your_file_name>

例

$ cat "File A"
1 2 
2 3
4 5 6 
1 1 1 5

$ numsum -c "File A"
8 11 7 5

或您想要的格式：

$ numsum -c "File A" | awk '{for(i=1;i<=NF;i++) {print "for column "i" is "$i}}'
for column 1 is 8
for column 2 is 11
for column 3 is 7
for column 4 is 5

从 man numsum

-c      Print out the sum of each column.

来自的例子 man numsum

EXAMPLES

   Add up the 1st, 2nd and 5th columns only.

       $ numsum -c -x 1,2,5 columns
       15 40 115

   Add up the rows of numbers of a file.

        $ numsum -r columns
        55
        60
        65
        70
        75

#!/bin/sh

while read a b c d; do
    col1=$((col1 + a))
    col2=$((col2 + b))
    col3=$((col3 + c))
    col4=$((col4 + d))
done < File_A

echo $col1 $col2 $col3 $col4

从对您自己答案的评论来看，您一次只想要一列的总和。如果是这样，这是一种非确定的方法：

cut -d' ' -f3 FileA | grep . | paste -s -d+ | bc

您将在其中替换为3您感兴趣的列号。

这是一种单行Perl脚本方法。这依赖于使用-aflag，它允许将带有-nflag的当前读取行自动拆分为array @F。我们所要做的是遍历这些项目，并将其添加到他们各自的指数$sum阵列，从而有效每个数组项是每个相应列总和。最后，我们在END代码块中打印结果 。

$ perl -lane '$j=0;foreach $i (@F){$sum[$j]+=$i; $j+=1;}; END{print join("\n",@sum)} ' input.txt                                                     
8
11
7
5

另外，这是完整的Perl脚本方法。它依赖于将每一行拆分为数组，并遍历该数组中的每个项目，将每个数字添加到数组中它们各自的位置@sums。该脚本将打印出每一行，然后为每一列生成报告。每一行的印刷可通过添加被除去#之前printf("%s",$line);

#!/usr/bin/env perl
use strict;
use warnings;

open(my $fh,"<",$ARGV[0]); 
my $i = 0;
my @sums;

while(my $line = <$fh>) { 
    printf("%s",$line);
    my @nums = split(" ",$line);
    my $j = 0;
    foreach my $num (@nums){
        $sums[$j] += $num;
        $j += 1;
    }

}

my $k = 0;
foreach my $sum (@sums){
    printf("- column %d sum: %d\n",$k,$sum);
    $k+=1;
}

close($fh);

用法很简单chmod +x ./sum_columns.pl && ./sum_columns.pl input.txt。例如：

$ ./sum_columns_2.pl input.txt                                                                                                                       
1 2 
2 3
4 5 6 
1 1 1 5
- column 0 sum: 8
- column 1 sum: 11
- column 2 sum: 7
- column 3 sum: 5

一个简单的解决方案：

awk '{sum += $i} END {print sum}' file

将i替换为列号，例如column1：

awk '{sum += $1} END {print sum}' file

输出为：

8