Wolfram Language™

Améliorez des ensembles de données intégrés

La vaste collection de données socio-économiques en Wolfram Knowledgebase peuvent être utilisées pour améliorer les sources de données externes.

Commencez avec un ensemble de données de sites de Head Start, importés du département américain du Logement et du Développement urbain.

In[1]:=

hs = ResourceData["Head Start Locations"][ All, {"CenterName", "CenterAddress", "CenterStateEntity", "CenterCityEntity", "CenterZipCodeEntity", "Coordinates"}];

In[2]:=

Take[hs, 5]

Out[2]=

Utilisez un opérateur de sélection pour extraire un sous-ensemble de sites.

In[3]:=

hsChicago = hs[Select[#CenterCityEntity === Entity["City", {"Chicago", "Illinois", "UnitedStates"}] &]];

Représentez-les sur une carte de Chicago.

In[4]:=

GeoListPlot[hsChicago[All, #Coordinates &]]

Out[4]=

Groupez les sites de Head Start et tracez leur répartition par code postal.

In[5]:=

chicagoCounts = Length /@ GroupBy[hsChicago, #CenterZipCodeEntity &];

In[6]:=

GeoRegionValuePlot[chicagoCounts]

Out[6]=

Récupérez des données intégrées sur la population en âge scolaire à Chicago dans les codes postaux et tracez ces valeurs contre les chiffres de sites de Head Start dérivés des données HUD externes.

In[7]:=

zipcodes = Normal@Keys[chicagoCounts]

Out[7]=

In[8]:=

chicagoMedian = EntityValue[zipcodes, EntityProperty["ZIPCode", "Population", {"Age" -> "SchoolAge"}], "EntityAssociation"];

In[9]:=

locsVSkids = Merge[{Normal@chicagoCounts, chicagoMedian}, Identity]; ListPlot[locsVSkids, FrameLabel -> {"Head Start locations", "School age population"}, ImageSize -> 550, PlotTheme -> "Detailed"]

Out[9]=