Поскольку строки являются столбцами в транспонированной матрице;соответствовать вашему примеру;это просто
rowMatrix :: [[a]] -> Int -> [a]
rowMatrix xs m = transpose xs !! (m-1)
Мне тоже пришлось исправить твой тип.Также обратите внимание на проблему off-by-1.
> rowMatrix [[1,2,3,4], [5,6,7,8], [9,10,11,12]] 3
[3,7,11]
it :: [Int]