MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: functional programming excercise from Mastering Mathematica


Why not this way :

In[1]:=
foldList[f_,x_,vars_]:=ComposeList[Function[x,f[x,#]]& /@ vars,x]

In[2]:=
foldList[f, x, {a, b, c }]

Out[2]=
{x,f[x,a],f[f[x,a],b],f[f[f[x,a],b],c]}

In[3]:=
FoldList[f, x, {a, b, c }]

Out[3]=
{x,f[x,a],f[f[x,a],b],f[f[f[x,a],b],c]}


v.a.


  • Prev by Date: Writing result of "Do" in a single List
  • Next by Date: Re: Interaction of Sum/Plus and KroneckerDelta
  • Previous by thread: Re: functional programming excercise from Mastering Mathematica
  • Next by thread: Re: functional programming excercise from Mastering Mathematica