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. > >
- References:
- How can I force mathematica to collect a symbol from a polynomial
- From: syzhaoyu@gmail.com
- How can I force mathematica to collect a symbol from a polynomial