Emergency UNIX and Linux Support

inscription	1	1
ionosphere	0	0
magnate	0	1
majesty	1	0
meritocracy	0	0
monarchy	0	0
monkey	1	0
notepaper	1	1

TP 2
TN 3
FN 1
FP 2

#! /bin/ksh

typeset -i iTP=0
typeset -i iTN=0
typeset -i iFP=0
typeset -i iFN=0
typeset    chTitle=""
typeset -i iPred=0
typeset -i iReal=0

typeset    fIn="/path/to/your/input.file"

while IFS='<t>' read chTitle iPred iReal ; do
     if [ $iPred -eq 0 ] ; then
          if [ $iReal -eq 0 ] ; then
               (( iTN += 1 ))
          else
               (( iFN += 1 ))
          fi
     else
          if [ $iReal -eq 0 ] ; then
               (( iFP += 1 ))
          else
               (( iTP += 1 ))
          fi
     fi
done < "$fIn"

print - "True Positives : $iTP"
print - "True Negatives : $iTN"
print - "False Positives: $iFP"
print - "False Negatives: $iFN"

exit 0

TP=`grep -c "1[[:blank:]]\{1,\}1$" infile`
TN=`grep -c "0[[:blank:]]\{0,\}0$" infile`
FN=`grep -c "0[[:blank:]]\{0,\}1$" infile`
FP=`grep -c "1[[:blank:]]\{0,\}0$" infile`
echo TP" $TP";echo TN" $TN";echo FN" $FN";echo FP" $FP"

awk -F'\t' '
        {
                TP += ( $2 == 1 && $3 == 1 ) ? 1 : 0
                TN += ( $2 == 0 && $3 == 0 ) ? 1 : 0
                FP += ( $2 == 1 && $3 == 0 ) ? 1 : 0
                FN += ( $2 == 0 && $3 == 1 ) ? 1 : 0
        }
        END {
                print "TP", TP
                print "TN", TN
                print "FP", FP
                print "FN", FN
        }
' file

awk '{a[$2,$3]++} END { printf "TP:%d\nTN:%d\nFP:%d\nFN:%d\n",a[1,1],a[0,0],a[1,0],a[0,1] }' infile