list - 使用列表理解将元组列表转换为其元素列表

Question

我目前正在为 10 月的考试复习，我遇到了一个问题，我似乎找不到好的解决方案。

我想读入一个整数元组列表，如下所示:[(1,2),(3,4),(5,6),..] 并希望列表理解返回 [1,2,3,4,5,6,..]

以下工作正常，但我希望它在一个列表理解中。

func :: [(Integer, Integer)] -> [Integer]
func xs = concat [ [x,y] | (x,y) <- xs ]

我怎样才能让它工作？

Answer 1

您可以在列表理解的右侧使用 extra 迭代，例如:

func :: [(a, a)] -> [a]
func xs = [ xi | (x1, x2) <- xs, <b>xi <- [x1, x2]</b> ]

所以我们编写列表理解就像人们用命令式编程语言编写嵌套循环一样。