Re: How to apply a list of functions

*To*: mathgroup at smc.vnet.net*Subject*: [mg112914] Re: How to apply a list of functions*From*: Sam Takoy <sam.takoy at yahoo.com>*Date*: Tue, 5 Oct 2010 05:37:58 -0400 (EDT)*References*: <201010030739.DAA19966@smc.vnet.net> <i89j4i$lqn$1@smc.vnet.net>

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

**References**:**How to apply a list of functions***From:*Sam Takoy <sam.takoy@yahoo.com>