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

Re: Modifying displayed form of an expression?

• To: mathgroup at smc.vnet.net
• Subject: [mg57130] Re: [mg57127] Modifying displayed form of an expression?
• From: Chris Chiasson <chris.chiasson at gmail.com>
• Date: Tue, 17 May 2005 01:19:54 -0400 (EDT)
• References: <200505170135.VAA23181@smc.vnet.net>
• Reply-to: Chris Chiasson <chris.chiasson at gmail.com>
• Sender: owner-wri-mathgroup at wolfram.com

If this does not work for you, let me know:
f=(3*x*Exp[1+s+y])/(Exp[foo-bar]-Exp[llama+bait])
f/.((a__)*Exp[b__])/(Exp[c__]-Exp[d__])->(a*Exp[b-c])/(1-Exp[d-c])

On 5/16/05, AES <siegman at stanford.edu> wrote:
> I have a number of symbolic results which emerge from a Mathematica
> calculation in the form
> 
>                 a  Exp[b]
>   f  =  ----------------------------------
>               Exp[c] - Exp[d]
> 
> where a is "other stuff" and b, c and d are simple sums like b = b1 + b2
> + b3.  By default Mathematica seems to shuffle the elements of b, c and
> d in these results such that there will be only positive signs in the
> exponents b, c and d.
> 
> I want to force Mathematica to display each of these expressions in the
> form
> 
>                   a Exp[b - c]
>      -------------------------------------------
>                1 -  Exp[d - c]
> 
> so that the leading term in the denominator is always one (which will in
> fact mean that these expressions all have the same common denominator).
> How might I do this?
> 
> Note: I only want to force this display of each expression _once_, when
> I first calculate it, and I'm willing to do some handwork on each
> expression to accomplish this.  Thus, I don't need some sophisticated
> general tool, just a way to do this "by hand".  I've been trying Inputs
> like
> 
>       (Exp[-c] Numerator[f]) / (Exp[-c] Denominator[f])
> 
> and not getting anywhere.
> 
> Ideas?
> 
> 


-- 
Chris Chiasson
http://chrischiasson.com/
1 (810) 265-3161

• References:
  • Modifying displayed form of an expression?
    • From: AES <siegman@stanford.edu>