RE: Factor Polynomials
- To: mathgroup at smc.vnet.net
- Subject: [mg34299] RE: [mg34267] Factor Polynomials
- From: "David Park" <djmp at earthlink.net>
- Date: Tue, 14 May 2002 04:10:17 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Nikola,
expr = x^2 + y^2 - 2 x y + x1^2 + y1^2 - 2x1 y1
x^2 + x1^2 - 2*x*y + y^2 - 2*x1*y1 + y1^2
In this case, it turns out, you can get your simplification with
FullSimplify[%]
(x - y)^2 + (x1 - y1)^2
But you could also have done "surgery" on the parts by
Factor[expr[[{1, 3, 4}]]] + Factor[expr[[{2, 5, 6}]]]
(x - y)^2 + (x1 - y1)^2
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
> From: Nikola [mailto:nletic at hotmail.com]
To: mathgroup at smc.vnet.net
>
> Hi,
> how can I factor polynomials like these:
> x^2+y^2-2 x y+x1^2 +y1^2-2x1 y1
> so I get result:
> (x-y)^2+(x1-y1)^2
> Factor and other similar functions don't do anything in this case.
> Thanks
> Nikola
>