如何反轉列表列表？

Question

我有一個[[a]]類型，例如：

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

但是我想在Haskell中創建一個函數，使其看起來像：

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

我從此功能開始，但不適用於其中包含列表的列表：

myreverse ::[Integer] -> [Integer]
myreverse [] = []
myreverse (h:t)= myappend (myreverse t) [h]

（ myappend是我擁有的本地函數，它將追加列表）

那么，我需要在代碼中進行哪些更改才能使其與包含其他列表的列表一起使用？

Answer 1

您的嘗試已經非常接近解決方案：

myreverse ::[Integer] -> [Integer]
myreverse [] = []
myreverse (h:t)= myappend (myreverse t) [h]

主要是您只需要更改兩件事。 首先使用類型變量更改Integer ，以便您可以使用函數反轉列表中的列表。 其次，您想在此處將列表追加到列表： myappend (myreverse t) [h]為此，只需使用++ ，就完成了！

myreverse :: [a] -> [a]
myreverse [] = []
myreverse (h:t)= (myreverse t) ++ [h]

---

如果您不想編寫自己的函數，也已經有一個reverse函數：

Data.List.reverse [[1,2,3],[1,2],[1],[]]

輸出：

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

Answer 2

您可以使用reverse功能或執行以下操作來做到這一點：

reversal :: [a] -> [a]
reversal [] = []
reversal (x : xs) = (reversal xs) ++ [x]

在您的示例中使用此代碼：

*Main> reversal [[1,2,3],[1,2],[1],[]]
[[],[1],[1,2],[1,2,3]]