Haskell如何合并两个嵌套列表的对应子列表并拼接元素

你需要的效果可以通过zipWith函数实现，这是最简洁的写法：

zipWith (++) x y

原理说明 #

• zipWith 接收三个参数：第一个是二元处理函数，后两个是长度匹配的待处理列表，它会将两个列表对应位置的元素逐一传入处理函数，最终返回所有处理结果组成的新列表
• 这里我们传入的处理函数是列表拼接运算符(++)，刚好可以将两个对应位置的子列表直接拼接，完全符合你的需求

如果你想用你猜测的map实现也可以，需要先把两个列表配对再处理：

map (\(a, b) -> a ++ b) (zip x y)

两种写法的运行结果一致，都可以得到你期望的输出：

[["one", "two", "three", "four"], ["five", "six", "seven", "eight"], ["nine", "ten", "eleven", "twelve"]]

内容的提问来源于stack exchange，提问作者user142650