Re: How to apply a list of functions

• To: mathgroup at smc.vnet.net
• Subject: [mg112932] Re: How to apply a list of functions
• 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]}}}

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]}}
> >
> >
> >
> >
> > 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
>
>

```

• Prev by Date: Re: How to apply a list of functions
• Next by Date: Determing Number of Measures
• Previous by thread: Re: How to apply a list of functions
• Next by thread: Re: How to apply a list of functions