Re: "Accumulate" with operator Times.
- To: mathgroup at smc.vnet.net
- Subject: [mg114880] Re: "Accumulate" with operator Times.
- From: Peter Pein <petsie at dordos.net>
- Date: Tue, 21 Dec 2010 00:19:50 -0500 (EST)
- References: <iemq88$m7m$1@smc.vnet.net>
Am Mon, 20 Dec 2010 05:40:24 +0000 (UTC)
schrieb Matthias Bode <lvsaba at hotmail.com>:
> Hola:
>
> In[5]:= Accumulate[{a, b, c}] yields
>
> Out[5]= {a, a + b, a + b + c}
>
> Is there a simple command, similar to Accumulate, that yields
>
> {a, a*b, a*b*c} ?
>
> Best regards,
>
> MATTHIAS BODE
> S 17.35775=B0, W 066.14577=B0
> 2'740 m
> AMSL.
>
Yes:
In[27]:= Accumultiply[{}]={1};
Accumultiply[{f_,r___}]:=FoldList[Times,f,{r}]
In[29]:= Accumultiply[{a,b,c}]
Out[29]= {a,a b,a b c}
Peter