Re: How to apply a list of functions
- To: mathgroup at smc.vnet.net
- Subject: [mg112860] Re: How to apply a list of functions
- From: Ray Koopman <koopman at sfu.ca>
- Date: Mon, 4 Oct 2010 06:04:32 -0400 (EDT)
- References: <i89bv9$jg6$1@smc.vnet.net> <i89j3h$lq3$1@smc.vnet.net>
On Oct 3, 2:41 am, Ray Koopman <koop... at sfu.ca> wrote:
> On Oct 3, 12:39 am, Sam Takoy <sam.ta... at yahoo.com> wrote:
>> 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
>
> Plot[ Max[Sin@#,Cos@#]&@x, {x,-6,6}]
Sorry about that. It was late and I read "Map" as "Max".