Re: Reduction of Coefficients Coming Out of Solve

*To*: mathgroup at smc.vnet.net*Subject*: [mg48776] Re: [mg48761] Reduction of Coefficients Coming Out of Solve*From*: Oleksandr Pavlyk <pavlyk at phys.psu.edu>*Date*: Wed, 16 Jun 2004 04:54:28 -0400 (EDT)*Organization*: Penn State University; Department of Physics*References*: <200406150650.CAA27200@smc.vnet.net>*Reply-to*: pavlyk at phys.psu.edu*Sender*: owner-wri-mathgroup at wolfram.com

Hi Scott, FullSimplify of version 5.0.1 deals with it as you would expect In[41]:= FullSimplify[(3.4*10^62 + 4.5*10^63*x)/(6.7*10^64 + 8.9*10^63*x)] Out[41]= 0.5056179775280899 + 3.7681353364474184/ (-7.52808988764045 - 1.*x) Check out commands Factor or Apart on your expression. You could also extend Simplify using TranformationFunctions option In[51]:= Simplify[(3.4*10^62 + 4.5*10^63*x)/(6.7*10^64 + 8.9*10^63*x), TransformationFunctions -> {Apart, Factor}] Out[51]= 0.5056179775280899 - 3.7681353364474184/ (7.52808988764045 + 1.*x) Cheers, Sasha Scott Guthery wrote: > A rational polynomial result from Solve multiplies every coefficient by > a large factor of 10, e.g. 10^62. Neither Simplify nor FullSimpify > remove this common factor from the numerator and denominator. I can > remove it by hand but there must be a Mathematica trick that removes it. > > What might it be? > > For example: > > (3.4*10^62 + 4.5*10^63 x)/(6.7*10^64 + 8.9*10^63 x). > > Thanks for any insight. > > Cheers, Scott

**References**:**Reduction of Coefficients Coming Out of Solve***From:*"Scott Guthery" <sguthery@mobile-mind.com>