Importe e interprete datos de rascacielos 

Elabore un mapa que muestre los lugares e imágenes de los edificios más altos del mundo.

Éste es un archivo con datos de los edificios en una forma tabular.

In[1]:=

X FilePrint["ExampleData/Buildings.dat"]

Importe los datos, interpretando nombres de países y ciudades para generar objetos Entity computables.

In[2]:=

X importedBuildings = SemanticImport["ExampleData/Buildings.dat", Automatic, "NamedRows", HeaderLines -> 1]; Take[importedBuildings, 3]

Out[2]=

Interprete los nombres de los edificios para obtener objetos Entity computables, filtrando aquellos que no pueden ser traducidos.

In[3]:=

X buildingsAndCities = Cases[ {Interpreter["Building"][#["Name"]], #["City"]} & /@ importedBuildings, {_Entity ..}]

Out[3]=

Seleccione los edificios que tienen imágenes y obtenga su ubicación geográfica.

In[4]:=

X imagesAndCoordinates = Cases[ {#[[1]]["Image"], #[[2]]["Coordinates"]} & /@ buildingsAndCities, {_Image, _GeoPosition}];

Ubique las imágenes de edificios en un mapa mundi por medio de coordenadas geográficas.

In[5]:=

X GeoGraphics[ GeoMarker[#[[2]], #[[1]], "Scale" -> 20.0] & /@ imagesAndCoordinates, ImageSize -> 800, GeoCenter -> {0., -130}, GeoRangePadding -> Scaled[0.2]]

Out[5]=