¿Cómo puedo sumar rápidamente todos los números en un archivo?

Puedes usar awk:

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

Ninguna de las soluciones hasta ahora utilizar paste. Aquí hay uno:

paste -sd+ filename | bc

Como ejemplo, calcule Σn donde 1

$ seq 100000 | paste -sd+ | bc -l
5000050000

(Para los curiosos, seq n imprimiría una secuencia de números de 1 a n dado un número positivo n.)

Solo por diversión, comparémoslo:

$ for ((i=0; i<1000000; i++)) ; do echo $RANDOM; done > random_numbers

$ time perl -nle '$sum += $_ } END { print $sum' random_numbers
16379866392

real    0m0.226s
user    0m0.219s
sys     0m0.002s

$ time awk '{ sum += $1 } END { print sum }' random_numbers
16379866392

real    0m0.311s
user    0m0.304s
sys     0m0.005s

$ time { { tr "\n" + < random_numbers ; echo 0; } | bc; }
16379866392

real    0m0.445s
user    0m0.438s
sys     0m0.024s

$ time { s=0;while read l; do s=$((s+$l));done<random_numbers;echo $s; }
16379866392

real    0m9.309s
user    0m8.404s
sys     0m0.887s

$ time { s=0;while read l; do ((s+=l));done<random_numbers;echo $s; }
16379866392

real    0m7.191s
user    0m6.402s
sys     0m0.776s

$ time { sed ':a;N;s/\n/+/;ta' random_numbers|bc; }
^C

real    4m53.413s
user    4m52.584s
sys 0m0.052s

Aborté el sed run después de 5 minutos

Esto funciona:

{ tr '\n' +; echo 0; } < file.txt | bc

Otra opción es usar jq:

$ seq 10|jq -s add
55

-s (--slurp) lee las líneas de entrada en una matriz.

Esto es Bash recta:

sum=0
while read -r line
do
    (( sum += line ))
done < file
echo $sum

Aquí hay otro one-liner

( echo 0 ; sed 's/$/ +/' foo ; echo p ) | dc

Esto asume que los números son enteros. Si necesita decimales, pruebe

( echo 0 2k ; sed 's/$/ +/' foo ; echo p ) | dc

Ajuste 2 al número de decimales necesarios.

Prefiero usar GNU datamash para tales tareas porque es más sucinto y legible que perl o awk. Por ejemplo

datamash sum 1 < myfile

Donde 1 denota la primera columna de datos.

cat nums | perl -ne '$sum += $_ } { print $sum'

(igual que la respuesta de brian d foy, sin 'FIN')

Solo por diversión, vamos a hacerlo con PDL, el motor de matemáticas de matriz de Perl!

perl -MPDL -E 'say rcols(shift)->sum' datafile

rcols lee columnas en una matriz (1D en este caso) y sum (sorpresa) suma todo el elemento de la matriz.

Aquí hay una solución usando python con una expresión generadora. Probado con un millón de números en mi viejo portátil cruddy.

time python -c "import sys; print sum((float(l) for l in sys.stdin))" < file

real    0m0.619s
user    0m0.512s
sys     0m0.028s

Prefiero usar R para esto:

$ R -e 'sum(scan("filename"))'

sed ':a;N;s/\n/+/;ta' file|bc

$ perl -MList::Util=sum -le 'print sum <>' nums.txt

Perl 6

say sum lines

~$ perl6 -e '.say for 0..1000000' > test.in

~$ perl6 -e 'say sum lines' < test.in
500000500000

Otro para la diversión

sum=0;for i in $(cat file);do sum=$((sum+$i));done;echo $sum

U otro bash solamente

s=0;while read l; do s=$((s+$l));done<file;echo $s

Pero la solución awk es probablemente la mejor ya que es la más compacta.

Con Ruby:

ruby -e "File.read('file.txt').split.inject(0){|mem, obj| mem += obj.to_f}"

Más sucinto:

# Ruby
ruby -e 'puts open("random_numbers").map(&:to_i).reduce(:+)'

# Python
python -c 'print(sum(int(l) for l in open("random_numbers")))'

No se si puedes obtener algo mucho mejor que esto, considerando que necesitas leer todo el archivo.

$sum = 0;
while(<>){
   $sum += $_;
}
print $sum;

No he probado esto pero debería funcionar:

cat f | tr "\n" "+" | sed 's/+$/\n/' | bc

Es posible que tenga que agregar "\n" a la cadena antes de bc (como a través de echo) si bc no trata EOF y EOL...

Aquí hay otro:

open(FIL, "a.txt");

my $sum = 0;
foreach( <FIL> ) {chomp; $sum += $_;}

close(FIL);

print "Sum = $sum\n";

Puede hacerlo con la utilidad de línea de comandos Alacon para la base de datos Alasql.

Funciona con Node.js, por lo que necesita instalar el nodo .js y luego Alasql paquete:

Para calcular la suma del archivo TXT puede usar el siguiente comando:

> node alacon "SELECT VALUE SUM([0]) FROM TXT('mydata.txt')"

No es más fácil reemplazar todas las líneas nuevas por +, agregar un 0 y enviarlo al intérprete Ruby?

(sed -e "s/$/+/" file; echo 0)|irb

Si no tiene irb, puede enviarlo a bc, pero debe eliminar todas las líneas nuevas excepto la última (de echo). Es mejor usar tr para esto, a menos que tenga un doctorado en sed.

(sed -e "s/$/+/" file|tr -d "\n"; echo 0)|bc

Solo para ser ridículo:

cat f | tr "\n" "+" | perl -pne chop | R --vanilla --slave

C siempre gana por velocidad:

#include <stdio.h>
#include <stdlib.h>

int main(int argc, char **argv) {
    ssize_t read;
    char *line = NULL;
    size_t len = 0;
    double sum = 0.0;

    while (read = getline(&line, &len, stdin) != -1) {
        sum += atof(line);
    }

    printf("%f", sum);
    return 0;
}

Tiempo para números de 1M (misma máquina/entrada que mi respuesta de python):

$ gcc sum.c -o sum && time ./sum < numbers 
5003371677.000000
real    0m0.188s
user    0m0.180s
sys     0m0.000s