我一直在尝试在不使用惰性zipwith方法的情况下实现从 0 到 n 的斐波那契数列列表。到目前为止，我所拥有的是将列表从n1返回到 1 的代码。有什么方法可以更改此代码，以便它从 0- 返回列表n？
例子：
fib_seq 4 = [3,2,1,1]
-- output wanted: [1,1,2,3]
如果没有办法做我想让代码做的事情，有没有办法只返回斐波那契数字列表，再输入一个数字，再说 4 它将返回[0, 1, 1, 2].
fib_seq :: Int -> [Int]
fib_seq 0 = [0]
fib_seq 1 = [1]
fib_seq n = sum (take 2 (fib_seq (n-1))) : fib_seq (n-1)