Circle Orthotomic

Author

Eric W. Weisstein
March 16, 2008

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

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

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

Equation

Orthotomic[{Cos[t],Sin[t]},{x,y},t]//FullSimplify

Plot

Show[GraphicsArray[
Block[{$DisplayFunction=Identity},
OrthotomicPlot[{Sin[t],Cos[t]},#,{t,0,2Pi}]&/@{{0.8,0},{1,0},{1.2,0}}
]
]]