Haskell:使用列表理解并将每个列表的 x 减少 1 以生成 x 个列表

Question

我是 Haskell 的新手我花了几个小时试图构建一个简单的函数，输入一个函数会变成这样:

makeList 5 == [[1],[1,2],[1,2,3],[1,2,3,4],[1,2,3,4,5]]
makeList 2 == [[1],[1,2]]

没有多少研究可以真正帮助我弄清楚我应该如何迭代我的函数“x”，以便我根据我选择的数字构建多个列表，我很接近，但这就是我被难住的地方，我当前的代码本质上是设置如果我要输入 makeList 3 可以执行此操作的位置:

makeList 3 = [ [ x | x <- xs ] | xs <- [[1..x-2],[1..x-1],[1..x]] ]

打印出来:

[[1],[1,2],[1,2,3]]

Answer 1

Prelude> makeList n = [ [1..x] | x <- [1..n] ]
Prelude> makeList 5
[[1],[1,2],[1,2,3],[1,2,3,4],[1,2,3,4,5]]