Wolfram Language

Computación geográfica

Proyecciones UPS y UTM

La familia de proyecciones UTM (Universal Transversal de Mercator) es ampliamente utilizada en aplicaciones. En la versión 11, hay proyecciones de zona Norte y Sur UTM, evitando el uso de nortes negativos, como es habitual en la práctica. Las proyecciones UTM no pueden llegar a los polos y, por lo general, se complementan con dos tablas de UPS (Estereográfica Universal Polar), ahora también compatibles.

Esta lista contiene 60 zonas Norte UTM y las respectivas 60 zonas Sur UTM.

In[1]:=
Click for copyable input
Short[GeoProjectionData["UTMZone"], 3]
Out[1]//Short=

Éstas son definidas similarmente, pero tienen origen de cuadrícula diferente.

In[2]:=
Click for copyable input
GeoProjectionData["UTMZone34"]
Out[2]=
In[3]:=
Click for copyable input
GeoProjectionData["UTMZone34South"]
Out[3]=

Éstas son las dos zonas UPS.

In[4]:=
Click for copyable input
GeoProjectionData["UPSZone"]
Out[4]=

Están definidas en términos de la proyección Estereográfica Universal Polar.

In[5]:=
Click for copyable input
GeoProjectionData["UPSNorth"]
Out[5]=
In[6]:=
Click for copyable input
GeoProjectionData["UPSSouth"]
Out[6]=

El Documento de Normalización NGA.SIG.0012_ 2.0.0_UTMUPS de la Agencia Nacional de Inteligencia Geoespacial proporciona varios ejemplos para revisar la precisión de los algoritmos. Por ejemplo, proporciona los siguientes ejemplos en la sección 10.2 para la proyección de UPS.

In[7]:=
Click for copyable input
eg = GeoPosition[{{90, 0}, {89, -179}, {88, -90}, {87, -1}, {86, 0}, {85, 1}, {84, 89}, {83, 90}, {82, 91}, {81, 179}, {80, 180}, {40, 0}, {3, -179}, {2, -90}, {1, -1}, {0, 0}, {-1, 1}, {-2, 90}, {-3, 179}, {-4, 180}}]
Out[7]=

Represente estos puntos usando una proyección "UPSNorth". Note que el Polo Norte no está en {0, 0} en las coordenadas proyectadas debido a los parámetros de la retícula de origen no trivial.

In[8]:=
Click for copyable input
GeoGraphics[{Red, PointSize[Large], Point[eg]}, GeoProjection -> {"UPSNorth", "Centering" -> {90, 0}}, GeoGridLines -> Automatic, GeoZoomLevel -> 3, Frame -> True]
Out[8]=

Éstos son los números obtenidos con Wolfram Language, los cuales coinciden con aquellos datos en el Documento de Normalización de precisión micrométrica.

In[9]:=
Click for copyable input
NumberForm[Grid[First@GeoGridPosition[eg, "UPSNorth"]], {13, 6}, ExponentFunction -> (Null &)]
Out[9]//NumberForm=

Ejemplos relacionados

de en fr ja ko pt-br ru zh