MathGroup Archive 2010

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

Search the Archive

Re: How to apply a list of functions

  • To: mathgroup at smc.vnet.net
  • Subject: [mg112853] Re: How to apply a list of functions
  • From: Adriano Pascoletti <adriano.pascoletti at uniud.it>
  • Date: Sun, 3 Oct 2010 05:41:19 -0400 (EDT)
  • References: <201010030739.DAA19966@smc.vnet.net>

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


  • Prev by Date: Re: How to apply a list of functions
  • Next by Date: Re: Help to solve an integral by using Mathematica Integrate[Sqrt[t
  • Previous by thread: How to apply a list of functions
  • Next by thread: Re: How to apply a list of functions