Re: Form of a linear equation
- To: mathgroup at smc.vnet.net
 - Subject: [mg53742] Re: Form of a linear equation
 - From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
 - Date: Wed, 26 Jan 2005 04:36:17 -0500 (EST)
 - Organization: Uni Leipzig
 - References: <ct56ja$ebg$1@smc.vnet.net>
 - Sender: owner-wri-mathgroup at wolfram.com
 
Hi,
eqn = -(4 + 4x + y) / 17^(1/2) == (2 + x + y) / 2^(1/2);
eqn /. a_ == b_ :> Collect[ a - b, {x, y}] == 0
??
Regards
  Jens
"DJ Craig" <spit at djtricities.com> schrieb im Newsbeitrag 
news:ct56ja$ebg$1 at smc.vnet.net...
> I'm trying to convert this linear equation:
>
> -(4+4x+y) / 17^(1/2) = (2+x+y) / 2^(1/2)
>
> into the form:
>
> (a_)*x + (b_)*y + (c_) = 0
>
> This sounds simple enough, but I can't figure out how to make
> Mathematica do it.  My TI-89 does it automatically, but I need to be
> able to do this like a batch process for a bunch of linear equations.
> Heres the solution the TI-89 gives me:
>
> \!\(\*
> StyleBox[\(\((\(\(-4\)\ \@17\)\/17 - \@2\/2)\)\ x + \((\(-\@17\)\/17
> - \
> \@2\/2)\)\ y - \(3\ \@17\)\/17 - \@2 = 0\),
> FontWeight->"Bold"]\)
>
> Just copy and paste that mess into Mathematica and it will change into
> the equation at the top, but in the form that I want it.
>
> I haven't been using Mathematica for long.  I'm used to my TI-89; I've
> been using it for years.
>