在 Haskell 中生成无限列表

Question

所以，在为即将到来的考试做准备时，我正在复习一些旧考试，并遇到了这个问题：

编写 Haskell 代码来定义ints :: [Int] 一个如下形式的无限列表： [0, 1, -1, 2, -2, 3, -3, 4, -4..]

在过去的半个小时里，我一直在努力解决它，但似乎找不到任何解决问题的方法，或者可以满足我的要求。我觉得我真正想要的是表单的列表理解

ints :: [Int]
ints = [0] ++ [x (-x) | x <- [1..]]

但这不起作用，我不确定如何让它工作

Answer 1

问题是x (-x) 不是Int 类型（感谢@leftaroundabout 在这里删除了关于无效语法的废话）。您想为每个x 生成两个值。所以我想最简单的方法是创建许多列表对[1, -1]、[2, -2]，...然后将它们连接在一起。显然在前面加上0。

ints :: [Int]
ints = 0 : concat [[x, (-x)] | x <- [1..]]

此外，您可能希望使用Integer 而不是Int，因为Int 会在某些时候溢出，但Integer 不会。