如何從haskell中的列表中剪切？

Question

實現列表功能，將列表的一部分切掉！ 第一個參數是子列表開始的索引，第二個參數是切割的長度。

list :: Int -> Int -> [b] -> [b]
list a b (x: xs) = x: sublist (a: a + b) xs

我嘗試了這個遞歸解決方案，但它不起作用。 我不知道如何制作此代碼。 我能得到一些幫助嗎？

Answer 1

利用前奏。 先下降，然后采取：

cut :: Int -> Int -> [a] -> [a]
cut m n = take n . drop m

例如：

> cut 2 3 [0, 1, 1, 2, 3, 5, 8, 13]
[1,2,3]

或者，如果您設置滾動自己的遞歸實現：

cut' :: Int -> Int -> [a] -> [a]
cut' 0 0 xs       = []                    -- done
cut' _ _ []       = []                    -- done
cut' 0 n (x : xs) = x : cut' 0 (n - 1) xs -- take
cut' m n (x : xs) = cut' (m - 1) n xs     -- drop

的確：

> cut' 2 3 [0, 1, 1, 2, 3, 5, 8, 13]
[1,2,3]