Tschirnhausen Cubic Pedal Curve

Author

Eric W. Weisstein
March 16, 2008

This notebook downloaded from http://mathworld.wolfram.com/notebooks/PlaneCurves/TschirnhausenCubicPedalCurve.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/TschirnhausenCubicPedalCurve.html.

©2008 Wolfram Research, Inc. except for portions noted otherwise

Initialization

tschirnhaus={1-3t^2,t(3-t^2)};

Equation

FullSimplify[PedalCurve[tschirnhaus,{(Subscript[x, 0]),(Subscript[y, 0])},t]]

PedalCurve[tschirnhaus,{0,0},t]

Plot

PedalCurvePlot[tschirnhaus,{0,0},{t,-5,5},{0,4,.3}]