Shell Programming and Scripting

awk -F, '
BEGIN   {CNTLM = split ("15,25,35,50", LMT)
#        LMT[CNTLM+1] = "50+"
        }

        {LNC[$6]++
#        TOT++
         for (IX=1; IX<=CNTLM; IX++) if ($10 <= LMT[IX]) break
         CNT[$6,IX]++ 
        }


END     {for (l in LNC)
                {printf "%d", l
                 for (IX=1; IX<=CNTLM+1; IX++) printf "\t%d", CNT[l,IX]+0
                 printf RS
#                TOT2 += LNC[l]
                }
#        print TOT, TOT2
        }
'  tmp1
10      752     24      3       0       0
12      969     31      0       0       0
13      970     4       0       0       0
14      369     7       1       0       0
22      1036    169     12      0       0
15      920     19      0       0       0
24      1157    24      0       0       0
18      771     6       1       0       0
28      1100    48      7       1       0
2       1093    118     9       1       0
8       1197    3       1       0       0
9       1182    3       0       0       0

	 printf "FLD6"
	 for (IX=1; IX<=CNTLM; IX++) printf "\t<=%s", LMT[IX]
	 printf "\t>%d" RS, LMT[--IX]

awk -F, '
BEGIN   {CNTLM = split (CATS, LMT)                                      # prepare the limits array for the categories given as a script parameter below
        }

        {LNC[$6]++                                                      # line count of $6 occurrences, also used for later printing the $6 values 
         for (IX=1; IX<=CNTLM; IX++) if ($10 <= LMT[IX]) break          # calculate the column index based on a comparison between $10 and the limits array
         CNT[$6,IX]++                                                   # increment the counter for $6 value and category index (if $10 greater than 50, IX == 5)
        }


END     {printf "FLD6"                                                  # create header's first element
         for (IX=1; IX<=CNTLM; IX++) printf "\t<=%s", LMT[IX]           # and further elements i.e. less or equal category limits
         printf "\t>%d" RS, LMT[--IX]                                   # last: greater than largest limit

         for (l in LNC)                                                 # now: create lines for each $6 value (taken from LNC array)
                {printf "%d", l                                         # print the $6 value as the leftmost column
                 for (IX=1; IX<=CNTLM+1; IX++) printf "\t%d", CNT[l,IX] # print the respective category's count for this $6 value
                 printf RS                                              # new line
                }
        }
' CATS="15,25,35,50" tmp1                                               # supply the categories and the input file

awk -F, -v CATS="-10,-5,0,15,25,35,50" '
.
.
.
FLD6    <=-10   <=-5    <=0     <=15    <=25    <=35    <=50    >50
2       0       1       2       1090    118     9       1       0
8       2       0       4       1191    3       1       0       0
.
.
.
22      1       0       2       1033    169     12      0       0

awk '{ 
  TR=0
  for( I = 1; I <= NF; I++ ) {
    TR += $I
    TC[I] += $I
    printf( "%6d", $I )
  }
  print "  = " TR
  TF = NF
}

END {
  for( I = 1; I <= TF; I++ )
    printf "%6d", TC[I]
  print ""
}