20/02/12 20:45:42.48 DqzYUQ+/.net
>>9
Rなら同様の関数をもっと短く分かりやすく書ける。
diagonals <- function(A) lapply(2:sum(dim(A)), function(i) A[row(A) + col(A) == i])
diagonals(matrix(1:12, 3, 4, byrow = TRUE))
これで [[1], [5,2], [9,6,3], [10,7,4], [11,8], [12]] というベクトルのリストが
生成される。
>>16
そうだな。プログラミング言語は問題を解くための道具だが、Haskellの場合、
プログラミング言語自体が解くための問題になっている感じ。