Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2013

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

Search the Archive

Re: How can I force mathematica to collect a symbol from a polynomial

  • To: mathgroup at smc.vnet.net
  • Subject: [mg130408] Re: How can I force mathematica to collect a symbol from a polynomial
  • From: Bob Hanlon <hanlonr357 at gmail.com>
  • Date: Wed, 10 Apr 2013 00:47:47 -0400 (EDT)
  • 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: <20130409083015.0249069F0@smc.vnet.net>

expr=a+b+c;

expr2=a*HoldForm[Evaluate[Expand[expr/a]]]

a (1+b/a+c/a)

expr2//ReleaseHold//Simplify

a+b+c


Bob Hanlon



On Tue, Apr 9, 2013 at 4:05 AM, <syzhaoyu at gmail.com> wrote:

> Let's say I have a polynomial:
>           a+b+c
> Is there any way I can force mathematica to produce the following result:
>           a*(1+b/a+c/a)
>
> I think such transformation of polynomials should be very common; however,
> I have been trying all day and still can not get mathematica to do so
> automatically.
>
>



  • Prev by Date: Re: 'show' command
  • Next by Date: Re: ChartStyle in BoxWhiskerChart
  • Previous by thread: How can I force mathematica to collect a symbol from a polynomial
  • Next by thread: Re: How can I force mathematica to collect a symbol from a polynomial