斐波那契哈斯克尔

Question

我开始使用“新”斐波那契算法，但它不起作用。很简单：

    --fiblista 0 n = [0]
    --fiblista 1 n = [1]
    fiblista a n 
        | a <= n = (0:1:tail, ((fiblista!!d)+(fiblista!!c))) fiblista a+1 n 
        where d = a - 1 
              c = a - 2

例子：

第一个错误代码：输入 `=' 时解析错误

知道如何解决这个算法吗？ 我在 haskell 中阅读了数千个示例斐波那契算法，但我需要编写一个新的。

Answer 1

你的缩进是错误的。试试：

fiblista 0 n = [0]
fiblista 1 n = [1]
fiblista a n 
    | a < n = (tail, ((fiblista!!d)+(fiblista!!c))) fiblista a+1 n 
  where d = a - 1 
        c = a - 2

但是这段代码仍然无法编译。 fiblista 是一个有两个参数的函数，但您也可以尝试将其用作列表。您还尝试将元组用作函数。

如果您仍然无法编写函数，那么如果您能描述fiblista 的参数是什么以及它应该返回什么，将会有所帮助。包括类型签名。

这是作业吗？

---

所以。

fiblista a n 是斐波那契数列，以 a^th 斐波那契数开头，以 (n-1 结尾)^th 斐波那契数。

这是一个列表问题。

Imagine you had a list of all the Fibonacci numbers。 （这与fiblista 0 ∞ 相同，如果∞ 是一个有效的Haskell 值。）然后您将能够使用标准列表函数take 和drop 来计算fiblista a n。