Série de valores do campo magnético da terra

As novas funções CoordinateBounds e CoordinateBoundingBox permitem achar os valores extremos em cada dimensão de um arranjo multidimensional. Este exemplo encontra os intervalos de valores do campo magnético da terra de uma dada região.

Defina uma região perto do Pólo Norte a partir de suas latitudes e longitudes.

In[1]:=

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

Faça uma representação gráfica desta região em um mapa do mundo.

In[2]:=

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

Out[2]=

Gere os dados do campo magnético da terra nesta região.

In[3]:=

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

Out[3]=

Extraia desses dados os componentes do campo magnético da Terra.

In[4]:=

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

Out[4]=

Converta a lista de arranjos em um arranjo de 3-vetores.

In[5]:=

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

Out[5]=

Estas são os intervalos dos componentes do campo magnético da Terra na região especificada.

In[6]:=

Thread[components -> CoordinateBounds[qa]]

Out[6]=