Re: Making (a*\[Theta]11)/(1+a^2) into (a/(1+a^2))*\[Theta]11

*To*: mathgroup at smc.vnet.net*Subject*: [mg131308] Re: Making (a*\[Theta]11)/(1+a^2) into (a/(1+a^2))*\[Theta]11*From*: Bob Hanlon <hanlonr357 at gmail.com>*Date*: Wed, 26 Jun 2013 01:04:11 -0400 (EDT)*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com*Delivered-to*: l-mathgroup@wolfram.com*Delivered-to*: mathgroup-outx@smc.vnet.net*Delivered-to*: mathgroup-newsendx@smc.vnet.net*References*: <20130626011328.C507B6A07@smc.vnet.net>

expr = (a*=E811)/(1 + a^2); rule = coef -> Coefficient[expr, =E811] coef -> a/(1 + a^2) expr = coef*=E811 coef =E811 expr /. rule (a*=E811)/(1 + a^2) Bob Hanlon On Tue, Jun 25, 2013 at 9:13 PM, PiMan <kevingrady4 at gmail.com> wrote: > Hi, I have a formatting question. > > In the output of an equation I am getting the term (a*\[Theta]11)/(1+a^2). > However, \[Theta]11 is the variable of interest here, and I would like the > term to be written as as a coefficient times \[Theta]11 and not include > \[Theta]11 in the ratio. That is, I would like the output to read > (a/(1+a^2))*\[Theta]11 instead. Does anyone have an idea of how I might be > able to do this? Thanks. > >

**References**:**Making (a*\[Theta]11)/(1+a^2) into (a/(1+a^2))*\[Theta]11***From:*PiMan <kevingrady4@gmail.com>