Message Boards Message Boards

0
|
4962 Views
|
4 Replies
|
1 Total Likes
View groups...
Share
Share this post:

Merge similar terms after shifting the terms in the following equation?

Posted 4 years ago

When I run the command as follows:

Eliminate[{x^2/a^2 - y^2/b^2 == 1, y == k x + m}, y]

the result is:

m^2 + 2 k m x == -b^2 + (b^2 x^2)/a^2 - k^2 x^2 && a != 0 && b != 0

but I want to the result is like this:

b^2 + m^2 + 2 k m x + (-(b^2/a^2) + k^2) x^2 == 0

or furthermore is such as:

a^2 b^2 + a^2 m^2 + 2 a^2 k m x + (-b^2 + a^2 k^2) x^2 == 0

How to combine the similar terms after shifting the terms of the equation, and make the coefficients of the first and second terms of the quadratic equation of the univariate integer (like this `

a^2 b^2 + a^2 m^2 + 2 a^2 k m x + (-b^2 + a^2 k^2) x^2 == 0

This type answer is the best key to this question)? Thank you?

POSTED BY: Lee Tao
4 Replies

With a recent version of Mathematica you can do it this way:

(m^2 + 2 k m x ==
  -b^2 + (b^2 x^2)/a^2 - k^2 x^2)
SubtractSides[%]
MultiplySides[%, a^2, GenerateConditions -> False]
Collect[%, x, Apart]
POSTED BY: Gianluca Gorni
Posted 2 years ago

Very good! Thx!

POSTED BY: Lee Tao

Here is a way:

Collect[SubtractSides[
  m^2 + 2 k m x == -b^2 + (b^2 x^2)/a^2 - k^2 x^2], x]
POSTED BY: Gianluca Gorni
Posted 4 years ago

Great! But the best answer as the bottom how to get?

POSTED BY: Lee Tao
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract