拆分列表爲不均勻子列表

Question

我試圖分裂的50項爲不同大小的子列表清單;例如10 3 4 5。

我試着用take這樣做，但這種只需要前幾個項目列表中的反覆，而不是通過索引一起移動。

有沒有人有任何建議如何做到這一點？或者可以鏈接到一個Prelude/Data.List函數，它可以幫助我。 （我環顧四周，但我在努力尋找什麼。）

Answer 1

的

splitAt :: Int -> [a] -> ([a], [a]) 

和

snd :: (a, b) -> b 

一個裝配件組合的應該做的伎倆。

編輯：

splitUp :: [Int] -> [a] -> [[a]] 
splitUp [] xs = [xs] 
splitUp _ [] = [] 
splitUp (l:ls) xs = let (a,b) = splitAt l xs in a : splitUp ls b