Question

我有一个清单L

L = [ [0, 3, 1], [7, 2], [5, 11], [7],[] ]

我需要输出返回列表列表，但对于每个偶数子列表，它应该反转它，以便输出为：

L = [ [1, 3, 0], [7, 2], [11, 5], [7],[] ]

假设我们从0开始计算位置。

我可能需要获取有关列表包含多少个子列表的信息，然后反转每个偶数子列表。

Answer 1

这是Haskell解决方案的骨架，通过直接模式匹配：

reverseEverySecond :: [[a]] -> [[a]]
reverseEverySecond []           = []
reverseEverySecond [x]          = [reverse x]
reverseEverySecond (x : y : ys) = ... -- use reverse appropriately and recurse on ys

Answer 2

要反转单个列表，您只需使用内置的reverse函数即可。对于在交替元素上进行操作，有几种方法可以解决它。你可以写一个像这样的函数

addEveryOther :: Int -> [Int] -> [Int]
addEveryOther n (x:y:xs) = x + n : y : addEveryOther xs
addEveryOther n (x:[]) = x + n : []
addEveryOther n [] = []

或者，您可以执行类似

的操作

addEveryOther n xs = map go $ zip [0..] xs
    where
        go (i, x) = if even i then x + n else x

但这可能会更慢，因为它涉及更多操作和创建，然后立即破坏元组。

Answer 3

我建议将

组合起来

cycle [id, reverse] :: [[a] -> [a]]

zip :: [a] -> [b] -> [(a, b)]

map (uncurry ($)) :: [(a -> b, a)] -> [b]

在偶数上反转的子列表

3 个答案: