Miller Equidistant Projection

Author

Eric W. Weisstein
January 26, 2011

This notebook downloaded from http://mathworld.wolfram.com/notebooks/MapProjections/MillerEquidistantProjection.nb.

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

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

Figure

V5

Show[GraphicsArray[Partition[Graphics[ProjectionPlot[Projection[CylindricalEquidistant[#Degree]]],AspectRatio->Automatic,PlotLabel->StyleForm["(Subscript[ϕ, 1]) == "<>ToString[Floor[#]]<>"°"<>If[FractionalPart[#]>0,ToString[Round[FractionalPart[#]60]]<>"'",""],FontFamily->"Times",FontSlant->"Italic"]]&/@{37.5,43,50+28/60.},2,2,{1,1},{}]]]

V6

GraphicsGrid[Partition[Graphics[MapProjectionPlot[MapProjection[CylindricalEquidistant[#Degree]]],AspectRatio->Automatic,PlotLabel->StyleForm["(Subscript[ϕ, 1]) == "<>ToString[Floor[#]]<>"°"<>If[FractionalPart[#]>0,ToString[Round[FractionalPart[#]60]]<>"'",""]]]&/@{37.5,43,50+28/60.},2,2,{1,1},{}]]

"MillerEquidistantProjection"->,