2

我正在使用 Data.Vector,目前需要计算用于计算加密哈希 (Sha1) 的向量的内容。我创建了以下代码。

dynamic :: a -> Int -> (Int -> Vector a -> a) -> Vector a
dynamic e n f = 
let 
    start = Data.Vector.replicate n e   
in step start 0
where
    step vector i = if i==n then vector
                    else step (vector // [(i,f i vector)]) (i+1)

我创建了这个,以便填充向量的函数 f 可以访问沿途的部分结果。Data.Vector 中肯定已经存在这样的东西,不是吗?

问题陈述如下: 你要解决一个动态规划问题,其中完成的结果是一个数组。您知道数组大小的大小,并且您有一个递归函数来填充它。

4

2 回答 2

8

您可能已经看过这个函数generate,它接受一个大小n和一个f类型的函数,Int -> a然后生成一个Vector a大小n。您可能不知道的是,在使用此功能时,您实际上确实可以访问部分结果。

我的意思是,在您传递给generate您的函数内部,您可以引用您正在定义的向量,并且由于 Haskell 的懒惰,它可以正常工作(除非您使向量的不同项相互依赖当然是循环时尚)。

例子:

import Data.Vector

tenFibs = generate 10 fib
    where fib 0 = 0
          fib 1 = 1
          fib n = tenFibs ! (n-1) + tenFibs ! (n-2)

tenFibs现在是一个包含前 10 个斐波那契数的向量。

于 2010-09-08T22:34:03.213 回答
0

也许您可以使用 Data.Vector 的扫描功能之一? http://hackage.haskell.org/packages/archive/vector/0.6.0.2/doc/html/Data-Vector.html#32

于 2010-09-07T14:00:22.870 回答