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

mapping of function

• To: mathgroup at smc.vnet.net
• Subject: [mg69914] mapping of function
• From: dimmechan at yahoo.com
• Date: Wed, 27 Sep 2006 06:05:12 -0400 (EDT)

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: mapping of function
    • From: Adriano Pascoletti <pascolet@dimi.uniud.it>
  • Re: mapping of function
    • From: "Chris Chiasson" <chris@chiasson.name>