       Re: Fourth degree polynomial

• To: mathgroup at smc.vnet.net
• Subject: [mg29264] Re: [mg29251] Fourth degree polynomial
• From: BobHanlon at aol.com
• Date: Sat, 9 Jun 2001 03:08:51 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```In a message dated 2001/6/8 4:37:28 AM, Stephane.Redon at inria.fr writes:

>I've got a fourth degree polynomial which I would like to break into two
>second order polynomials. Unfortunately, the Factor function doesn't manage
>to do it, probably because it attempts to find all the roots of my
>polynomial. Is there a way to do this WITHOUT finding the roots ?
>

Recommend that you give examples of problem

poly = (x^2+7x-39)(9x^2-5x-71)//Expand

9*x^4 + 58*x^3 - 457*x^2 - 302*x + 2769

poly//Factor

(x^2 + 7*x - 39)*(9*x^2 - 5*x - 71)

If for some reason that doesn't work, you could use a brute force approach:

(a1*x^2+b1*x+c1)*(x^2+b2*x+c2) /.
CoefficientList[poly, x] ==
CoefficientList[(a1*x^2+b1*x+c1)*(x^2+b2*x+c2), x]], {a1, b1, b2,
c1, c2}][]

(x^2 + 7*x - 39)*(9*x^2 - 5*x - 71)

Bob Hanlon
Chantilly, VA  USA

```

• Prev by Date: Re: Replacing 1 to many in a list
• Next by Date: Re: Using rules with MathLink
• Previous by thread: Fourth degree polynomial
• Next by thread: Re: Fourth degree polynomial