Line Negative Pedal Curve

Author

Eric W. Weisstein
March 16, 2008

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

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

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

Equation

np=FullSimplify[NegativePedalCurve[{x0+a t,y0+b t},{x,y},t]]

NegativePedalCurve[{a t,0},{x,y},t]

Plot

<<Graphics`Colors`

With[{a=1,y=2,x=0},
ParametricPlot[{2 a t-x,((((-a t+x))^2)/y)},{t,-2,2},PlotStyle->Red]]