Haskell-创建2d数组

Question

对于Haskell而言，我相当新，并试图改进自己，就功能语言而言。我试图创建将采取若干行和列的函数，并且产生的2D阵列如下，例如：

arrayMaker :: (Int, Int) -> [[Int]] 
    -- use replicate function somehow to create each row? 

所得矩阵显示如下（5行，3列）：

[[14, 15, 16], 
[13, 12, 11], 
[8, 9, 10], 
[7, 6, 5], 
[2, 3, 4]] 

注意值从最后一行开始在2处。此外，数组应该在升序行和降序行之间交替。帮助将不胜感激

Answer 1

让我们先从这个例子：

rowMaker1 n k = [ n .. n+k-1 ] : rowMaker1 (n+k) k 

rowMaker1产生连续的数字组。它创建了一个无限的名单，所以我们用take限制计算元素的数量：

ghci> take 5 (rowMaker1 1 3) 
[ [1,2,3], [4,5,6], [7,8,9], [10,11,12], [13,14,15] ] 

我们也可以创建降序版本：

rowMaker2 n k = [ n,n-1..n-k+1 ] : rowMaker2 (n-k) k 

ghci> take 5 (rowMaker2 16 3) 
[[16,15,14],[13,12,11],[10,9,8],[7,6,5],[4,3,2]] 

的目标将是确定arrayMaker是这样的：

arrayMaker (nrows,ncols) = take nrows (rowMaker start ncols) 
    where start = ??? 
     rowMaker n k = ??? 

我们只需要一个rowMaker它将在升序组和降序组之间交替。

这有帮助吗？

如果您遇到问题，我在这里公布了一种可能性：http://lpaste.net/114299