tfix column indexing - numtools - perform numerical operations on vectors and matrices in unix pipes
 (HTM) git clone git://src.adamsgaard.dk/numtools
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
 (DIR) commit bd0b15dade8e5a6309e69b834d2830b2d5832239
 (DIR) parent 28866edd3b5db9c04759e3ffa034d698ba2022fd
 (HTM) Author: Anders Damsgaard <anders@adamsgaard.dk>
       Date:   Sun,  6 Jun 2021 16:40:41 +0200
       
       fix column indexing
       
       Diffstat:
         M max                                 |       6 +++---
         M mean                                |       6 +++---
         M min                                 |       6 +++---
         M sum                                 |       6 +++---
       
       4 files changed, 12 insertions(+), 12 deletions(-)
       ---
 (DIR) diff --git a/max b/max
       t@@ -1,13 +1,13 @@
        #!/usr/bin/awk -f
        {
       -        for (i = 0; i < NF; i++)
       +        for (i = 1; i <= NF; i++)
                        if (NR == 1 || $i > max[i])
                                max[i] = $i
        }
        END {
       -        for (i = 0; i < NF; i++) {
       +        for (i = 1; i <= NF; i++) {
                        printf("%g", max[i])
       -                if (i + 1 < NF)
       +                if (i < NF)
                                printf("\t")
                }
                printf("\n")
 (DIR) diff --git a/mean b/mean
       t@@ -1,12 +1,12 @@
        #!/usr/bin/awk -f
        {
       -        for (i = 0; i < NF; i++)
       +        for (i = 1; i <= NF; i++)
                        sum[i] += $i
        }
        END {
       -        for (i = 0; i < NF; i++) {
       +        for (i = 1; i <= NF; i++) {
                        printf("%g", sum[i] / NR)
       -                if (i + 1 < NF)
       +                if (i < NF)
                                printf("\t")
                }
                printf("\n")
 (DIR) diff --git a/min b/min
       t@@ -1,13 +1,13 @@
        #!/usr/bin/awk -f
        {
       -        for (i = 0; i < NF; i++)
       +        for (i = 1; i <= NF; i++)
                        if (NR == 1 || $i < min[i])
                                min[i] = $i
        }
        END {
       -        for (i = 0; i < NF; i++) {
       +        for (i = 1; i <= NF; i++) {
                        printf("%g", min[i])
       -                if (i + 1 < NF)
       +                if (i < NF)
                                printf("\t")
                }
                printf("\n")
 (DIR) diff --git a/sum b/sum
       t@@ -1,12 +1,12 @@
        #!/usr/bin/awk -f
        {
       -        for (i = 0; i < NF; i++)
       +        for (i = 1; i <= NF; i++)
                        sum[i] += $i
        }
        END {
       -        for (i = 0; i < NF; i++) {
       +        for (i = 1; i <= NF; i++) {
                        printf("%g", sum[i])
       -                if (i + 1 < NF)
       +                if (i < NF)
                                printf("\t")
                }
                printf("\n")