迭代功能不保存中间步骤？
|
我刚刚开始学习Haskell，并且作为练习进入了一个Euler项目问题，其中求和了斐波那契数。我当前的方法是此函数，它将使用下一个元素创建一个新列表：
fib :: (Integral a) => [a] -> [a]
fib xs@(x1:x2:_) = (x1+x2) : xs
iterate
[[2,1],[3,2,1],[5,3,2,1],..]
takeWhile
fib
没有找到相关结果
已邀请:
4 个回复
钾涎净介
！因为Haskell是一种纯语言，所以所有子列表都可以共享，并且您几乎无需为生成所有这些迷你列表付出任何代价：实际上是中的，依此类推。 您并不是真的想要，因为那会给您带来很多额外的麻烦，您仍然需要以到达列表末尾。而是使用。 另请注意，如果您打算对结果列表进行求和，您会错过，因此您将一口气。呕蹿尉
稼悸
甲车劲
apply_n f n x = if n = 0 then x else apply_n\' f (n-1) (f x) n_th_fib n = apply_n fib n [1,1]