Rangos de valores del campo magnético de la Tierra

Las nuevas funciones CoordinateBounds y CoordinateBoundingBox le permiten encontrar valores en cada dimensión de un arreglo multi-dimensional. Este ejemplo encuentra los rangos de valores del campo magnético de la Tierra en una región dada.

Defina una región cercana al Polo Norte desde sus latitudes y longitudes.

In[1]:=

lat = {65, 85}; lon = {-30, 30};

Represente gráficamente esta región en un mapa mundial.

In[2]:=

GeoGraphics[GeoBoundsRegion[{lat, lon}], GeoGridLines -> Automatic, GeoZoomLevel -> 5]

Out[2]=

Genere los datos del campo magnético de la Tierra en esta región.

In[3]:=

data = GeomagneticModelData[Transpose[{lat, lon}], GeoZoomLevel -> 1]

Out[3]=

Extraiga de estos datos los componentes del campo magnético de la Tierra.

In[4]:=

components = {"NorthComponent", "EastComponent", "DownComponent"}; arr = Lookup[data, components]

Out[4]=

Convierta la lista de arreglos en un arreglo de 3 vectores.

In[5]:=

qa = Transpose[QuantityArray[arr], {3, 1, 2}]

Out[5]=

Éstos son los rangos de los componentes del campo magnético de la Tierra en una región específica.

In[6]:=

Thread[components -> CoordinateBounds[qa]]

Out[6]=