Continued Fraction Map

Author

Eric W. Weisstein
November 25, 2002

This notebook downloaded from http://mathworld.wolfram.com/notebooks/SpecialFunctions/ContinuedFractionMap.nb.

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

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

Initialization

CFMap[x_]:=1/x-Floor[1/x]

Plots

<<Plot`

Real Axis

asymp=Table[1/n,{n,10,1,-1}];

PlotDiscontinuous[CFMap[x],{x,Sequence@@Append[asymp,4]},
PlotRange->All,
VerticalAsymptotes->asymp,
AxesLabel->TraditionalForm/@{x,CFMap[x]}]

Complex Plane

ComplexPlot3D[CFMap[z],{z,-5,5},PlotPoints->150]//Timing

ComplexContourPlot[CFMap[z],{z,-5,5}]//Timing