Exploring Analyic Geometry with Mathematica® |
|||||
| Home | Contents | Commands | Packages | Explorations | Reference |
| Tour | Lines | Circles | Conics | Analysis | Tangents |
Radical Axis of Two Circles
radaxis.html
Exploration
Show that the two circles
and
have the radical axis x-y=0.
Approach
Convert the equations to circles and find the radical axis of the circles.
Initialize
To initialize Descarta2D, select the input cell bracket and press SHIFT-Enter.
This initialization assumes that the Descarta2D software has been copied into one of the standard directories for AddOns which are on the Mathematica search path, $Path.
<<Descarta2D`
Solution
Construct the circles from the equations.
Clear[a,b,c];
{C1,C2}={Circle2D[Quadratic2D[1,0,1,a,b,c]],
Circle2D[Quadratic2D[1,0,1,b,a,c]]}
Construct the radical axis.
L1=Line2D[C1,C2] //Simplify
Convert the line to an equation.
Clear[x,y];
Equation2D[L1,{x,y}]
Discussion
This is a plot of a numerical example with a=1, b=5 and c=-1.
Sketch2D[{C1,C2,L1} /. {
a->1, b->5, c->-1}]
Graphics saved as "radaxi01.eps".