Cissoid of Diocles Pedal Curve

Author

Eric W. Weisstein
March 16, 2008

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

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

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

Plot

cissoid={Sin[t]^2,Tan[t] Sin[t]^2};

FullSimplify[PedalCurve[cissoid,{x,0},t]]

PedalCurvePlot[cissoid,{1,0},{t,-2,2},{0,Pi/2,.15},PlotRange->{-1,1}]

Show[PedalCurvePlot[{Sin[t]^2,Tan[t] Sin[t]^2},{4,0},{t,-2,0},{0,Pi/2,.15},DisplayFunction->Identity],PedalCurvePlot[{Sin[t]^2,Tan[t] Sin[t]^2},{4,0},{t,0,2},{0,Pi/2,.15},DisplayFunction->Identity],DisplayFunction->$DisplayFunction,PlotRange->{-2,2}]