我想打印由我的函数f。
形成的4x4整数矩阵import Numeric
import Numeric.LinearAlgebra
import Numeric.LinearAlgebra.Data
--import Numeric.Matrix
import Data.Array
f m n | (n==0) = 0
f m n | (m==1) = n
f m n = f (m-1) n + f m (n-1)
mymat = matrix 4 4 $ f
在最后一行的类型错误,我想找到填充2d矩阵的函数的适当变量,以及行和列函数的计算结果。
======被修改==
我找到了解决方案,但奇怪的是找到矩阵填充的标准功能并不容易。也许有一个?
import Numeric
import Numeric.LinearAlgebra
import Numeric.LinearAlgebra.Data
import Data.Array
f m n | (n==0) = 1
f m n | (m==0) = 1
f m n = f (m-1) n + f m (n-1)
qw x y 0 = [f 0 0]
qw x y n = (qw x y (n-1)) ++ [f (mod n x) (div n y) ]
mymat x y = matrix x (qw x y (x*y-1))
答案 0 :(得分:1)
感谢所有评论员。 现在问题不实际,因为我正在寻找这段代码:
matrix 4 [ f x y | x <- [0..3], y <- [0..3] ]