Shell Programming and Scripting

0    0    .    .      0    0
0    0    0    0    0    0
1    1    1    1    1    1
1    1    1    1    1    1
0    0    0    1    0    1

4 0
6 0
0 6
0 6
4 2

awk '{for (i=1; i<=NF; i++)
    {if ($i == "0") {zero[NR]++}
    if ($i == "1") {one[NR]++}
    }
    {for (j=1; j<=NR; j++)
    print zero[NR], one[NR]
    }
    }' file

awk '{CNT[0]=CNT[1]=0; for (i=1; i<=NF; i++) CNT[$i]++; print CNT[0], CNT[1]}' file
4 0
6 0
0 6
0 6
4 2

awk '{print gsub(/0/,""), gsub(/1/,"")}' file

awk '
        {
                for ( i = 1; i <= NF; i++ )
                {
                        if ( $i == "0" )
                                zero[NR]++
                        if ( $i == "1" )
                                one[NR]++
                }
        }
        END {
                for ( j = 1; j <= NR; j++ )
                        print zero[j] ? zero[j] : "0", one[j] ? one[j] : "0"
        }
' file