bumped up number of printed digits

1 files changed, 4 insertions, 4 deletions

diff --git a/sum4.awk b/sum4.awk
index 518f6e5..f9037da 100644
--- a/sum4.awk
+++ b/sum4.awk
@@ -5,6 +5,7 @@
 # output:   sums of numeric columns
 
 function isnum(n) {
+    OFMT = "%.18g"
     sign = "[+-]?"
     decimal = "[0-9]+[.]?[0-9]*"
     fraction = "[.][0-9]+"
@@ -16,8 +17,7 @@ function isnum(n) {
 NR==1 {
     nf_max = NF
     for (i=1; i<=NF; i++) {
-        if (!isnum($i))
-            header[i] = $i
+        (!isnum($i)) ? header[i] = $i : header[i] = "col" i
     }
 }
 
@@ -32,7 +32,7 @@ END {
     for (i=1; i<=nf_max; i++) {
         if (header[i])
             printf("%s: \t", header[i])
-        printf("%g\n", sum[i])
-        printf(i < nf_max ? "" : "\n")
+        printf("%.18g\n", sum[i])
+        printf(i < nf_max ? "" : OFS )
     }
 }