Re: Kummulative Liste

[Stefan Welke <spwelke@XXXXXXX.com>]

sstoll@XXXXXXX.com wrote:

> Hallo,
>
> ich suche eine Funktion, die mir jeweils die Summe alle ersten n- 
> Elemente liefert:
> Also, das erste Ergebnis-Element enthält auch nur das erste Quell- 
> Element
> Das zweite Ergebnis-Element enthält die Summe vom ersten und zweiten  
> Quell-Element, usw.
>
>
> list={170,13380,15,232}
>
> f/@list
>
> {170, 13550, 13565, 13797}
>
> Geht so was, wenn möglich ohne For und While?
>
> Danke.
> Sven
Lieber Sven,

die einfachste, wenn vielleicht auch nicht eleganteste Lösung, die mir 
einfällt, ist:
In[1]:=  l1={1,2,3,4,5};l2={1,1,1,1,1,1,1,1,1,1};
f[w_]:=Table[Sum[Part[w,j],{j,1,k}],{k,1,Length[w]}];
f[l1]
Out[3]:= {1,3,6,10,15}
In[4]:= f[l2]
Out[4]:= {1,2,3,4,5,6,7,8,9,10}

MfG
Stefan Welke