Haskell, Liste von Listen mit einer bestimmten Form (Liste Verständnis)

Question

Ich möchte eine Funktionen erstellen, die eine Liste und erstellt eine Liste der Liste mit Liste Verständnis mit dem Formular [[e1],[e1,e2],[e1,e2,e3]...].

Zum Beispiel:

f5 ['a','b','c'] = ["a","ab","abc"] 
f5 [1,2,3] = [[1],[1,2],[1,2,3]] 

Mein Code:

f5 xs = [a | a <- xs] 

-- tests: 
*Main> f5 ["a","b","c"] 
["a","b","c"] 
*Main> f5 [1,2,3] 
[1,2,3] 

Answer 1

Sie können es wie folgt tun:

f5 xs = [take index xs | (x, index) <- zip xs [1..]] 

Für jedes Element in der Liste ein Tupel erstellt wird, enthält das Element und sein Index, beginnend bei 1. Dann, mit take, für jedes Element in der gezippten Liste ein a Die Anzahl der Elemente aus der ursprünglichen Liste wird übernommen. Die Anzahl der Elemente ist im Index angegeben.

Eigentlich brauchen wir nicht einmal die x Element aus dem Tupel, so dass diese neu geschrieben werden könnte als

f5 xs = [take index xs | (_ ,index) <- zip xs [1..]] 

Answer 2

Dies funktioniert auch

foldr (\x rest -> [x]:(map (x:) rest)) [] [1,2,3,4]