haskell - 如何使用高阶函数将 Haskell 中的两个列表交错在一行中

Question

我想获取两个列表并使用一行代码返回交错列表。

interleave :: [a] -> [a] -> [a]
interleave xs ys = concat (zipWith (:) xs ys) 

不确定为什么这不起作用。

明白了:

interleave :: [a] -> [a] -> [a]
interleave xs ys = concat (zipWith (\x y -> [x]++[y]) xs ys)

Answer 1

你可能也喜欢

interleave xs ys = concat (transpose [xs, ys])

这是基于我多年前读到的观察结果(我现在不记得了——也许在 Python 文档中)，转置只是一个 n 向 zip。