Re: How to apply a list of functions
- To: mathgroup at smc.vnet.net
- Subject: [mg112932] Re: How to apply a list of functions
- From: Adriano Pascoletti <adriano.pascoletti at uniud.it>
- Date: Wed, 6 Oct 2010 03:16:41 -0400 (EDT)
Like this? In[8]:= Through /@ Through[{{Sin}, {Cos}}[x]] Out[8]= {{Sin[x]}, {Cos[x]}} In[9]:= Through /@ Through[{{Sin}, {Cos}}[{z1, z2, z3}]] Out[9]= {{{Sin[z1], Sin[z2], Sin[z3]}}, {{Cos[z1], Cos[z2], Cos[z3]}}} Adriano Pascoletti 2010/10/5 Sam Takoy <sam.takoy at yahoo.com> > On 10/3/2010 5:41 AM, Adriano Pascoletti wrote: > > Something like this? > > > > In[3]:= Through[{Sin, Cos}[x]] > > Out[3]= {Sin[x], Cos[x]} > > > > > > In[4]:= Through[{Sin, Cos}[{z1, z2, z3}]] > > Out[4]= {{Sin[z1], Sin[z2], Sin[z3]}, {Cos[z1], Cos[z2], Cos[z3]}} > > > > > > Adriano Pascoletti > > > > > > 2010/10/3 Sam Takoy<sam.takoy at yahoo.com> > > > >> Hi, > >> > >> As a follow up to my question about apply {Sin, Cos} to x, I came up > >> with the tasteless > >> > >> Map[Apply[#, {x}]&, {Sin, Cos}] > >> > >> but I expect that the pros in this ng will be able to improve upon it. > >> > >> Thanks, > >> > >> Sam > >> > >> > > > Hi, > > Thanks to all who suggested Through. > > It works of a List of functions, but doesn't work for a List of a List > of functions, such as {{Sin}, {Cos}}. Is there a way to make it work? > > Thanks! > > Sam > >