Orthographic Projection

Author

Eric W. Weisstein
January 26, 2011

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

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

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

Figure

V5

Show[Graphics3D[GlobePlot[]],Boxed->False,ViewPoint->{20,0,0}]

Show[Graphics[ProjectionPlot[Projection[Orthographic[]]]],AspectRatio->Automatic]

V6

Graphics[MapProjectionPlot[MapProjection[Orthographic[]]]]

"OrthographicProjection"->,

Inverse

Show[Graphics[{Red,Line/@MapCoordinates[]}],AspectRatio->Automatic,PlotRange->{{-1,1}Pi/2,{-1,1}Pi},ImageSize->100]

proj=Flatten[ProjectionPlot[Projection[Orthographic[]],GridLines->None][[-1,-1]]];

Show[Graphics[ProjectionPlot[InverseProjection[Orthographic[]],Identity@@@proj,GridLines->None]],AspectRatio->Automatic,PlotRange->{{-1,1}Pi/2,{-1,1}Pi},ImageSize->100]