Saddle Points

[rabestro]

Implement Saddle Points

[rabestro]

Proposed exemplar solution:

NR == 1 {
    Cols = NF
    for (i = 1; i<= Cols; i++)
        ColsMinimum[i] = $i
}
{
    max = $1
    for (i = 1; i <= Cols; i++) {
        if ($i > max) max = $i
        if ($i < ColsMinimum[i])
            ColsMinimum[i] = $i
    }
    RowsMaximum[NR] = max
}
END {
    for (row = 1; row <= NR; row++)
        for (col = 1; col <= Cols; col++)
            if (RowsMaximum[row] == ColsMinimum[col])
                print row, col
}