Re: Help with map /@

*To*: mathgroup at smc.vnet.net*Subject*: [mg128598] Re: Help with map /@*From*: Bob Hanlon <hanlonr357 at gmail.com>*Date*: Thu, 8 Nov 2012 02:10:46 -0500 (EST)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*Delivered-to*: l-mathgroup@wolfram.com*Delivered-to*: mathgroup-newout@smc.vnet.net*Delivered-to*: mathgroup-newsend@smc.vnet.net*References*: <20121107055615.6E1DC684C@smc.vnet.net>

Ex = T1[x, y, z] + T2[x, y, z] + T3[x, y, z]; n = 1; Integrate[#, #[[n++]]] & /@ Ex Integrate[T1[x, y, z], x] + Integrate[T2[x, y, z], y] + Integrate[T3[x, y, z], z] Bob Hanlon On Wed, Nov 7, 2012 at 10:19 AM, Hussain AlQahtani <hussain.alqahtani at gmail.com> wrote: > Dear Bob > Thanks for the great reply. But what if Ex = T1[x,y,z]+T2[x,y,z]+T3[x,y,z]; > > regards, > > HMQ > > > On Wed, Nov 7, 2012 at 9:29 AM, Bob Hanlon <hanlonr357 at gmail.com> wrote: >> >> Ex = T1[x] + T2[y] + T3[z]; >> >> Integrate[#, #[[-1]]] & /@ Ex >> >> Integrate[T1[x], x] + >> Integrate[T2[y], y] + >> Integrate[T3[z], z] >> >> Integrate[#, Cases[#, _Symbol, 1][[1]]] & /@ Ex >> >> Integrate[T1[x], x] + >> Integrate[T2[y], y] + >> Integrate[T3[z], z] >> >> >> Bob Hanlon >> >> >> On Wed, Nov 7, 2012 at 12:56 AM, KFUPM <hussain.alqahtani at gmail.com> >> wrote: >> > Dear All >> > >> > I have a this expression: >> > >> > Ex= T1[x]+T2[y]+T3[z]; >> > >> > I want to integrate the first term with respect to x, the second w.r.t y >> > and the third with respect to z and then sum them all. I want to use the map >> > function (/@) or similar to do that for me automatically. Your help is >> > really appreciated. >> > >> > HMQ >> > > > > > > -- > Hussain Al-Qahtani, Ph.D. > Assistant Professor > > Department of Mechanical Engineering > King Fahd University of Petroleum and Minerals > P.O. Box 414 Dhahran, 31261 > Saudi Arabia > > 966-3-860-2846 (Office) > 966-3-860-2949 (Fax) > >

**References**:**Help with map /@***From:*KFUPM <hussain.alqahtani@gmail.com>