Re: mapping of function
- To: mathgroup at smc.vnet.net
- Subject: [mg69938] Re: mapping of function
- From: dh <dh at metrohm.ch>
- Date: Thu, 28 Sep 2006 06:14:25 -0400 (EDT)
- References: <efdjnn$ms$1@smc.vnet.net>
Hi, MapAT does not seem to be a very convenient solution because you have to bother about positions. Mathematica can do this on its own by pattern matching. E.g.: exp1 /. {x -> Sin[x], y -> Cos[x]} Daniel dimmechan at yahoo.com wrote: > Hello. > > I am working on John Gray's Book Mastering Mathematica. > > Here is one simple expression. > > exp1 = x^3 + (1 + z)^2 > x^3 + (1 + z)^2 > > I am thinking of ways to map the sine function only to {x,z}. > Here are some alternatives I considered. > > MapAt[Sin, exp1, Flatten[(Position[exp1, #1] & ) /@ Variables[exp1], > 1]] > Sin[x]^3 + (1 + Sin[z])^2 > > MapAt[Sin, exp1, Position[exp1, _Symbol, Heads -> False]] > Sin[x]^3 + (1 + Sin[z])^2 > > Are there any other possibilities? > > Thanks for any response. >
- Follow-Ups:
- Re: Re: mapping of function
- From: Andrzej Kozlowski <akoz@mimuw.edu.pl>
- Re: Re: mapping of function
- From: Andrzej Kozlowski <akoz@mimuw.edu.pl>
- Re: Re: mapping of function