精選されたデータ集合を組込みデータで強化する

Wolfram Knowledgebaseの広範に渡る組込みの社会経済学データのコレクションを使って，外部ソースのデータを強化することができる．

Head Start（3，4歳児のための就学援助プログラム）の位置についてのデータ集合を，米国住宅・都市開発省からインポートする．

In[1]:=

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

In[2]:=

Take[hs, 5]

Out[2]=

選択演算子を使って，位置の部分集合を抽出する．

In[3]:=

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

それらをシカゴの地図上に表示する．

In[4]:=

GeoListPlot[hsChicago[All, #Coordinates &]]

Out[4]=

Head Startの位置をグループ分けし，郵便番号ごとにその分布をプロットする．

In[5]:=

GeoRegionValuePlot[chicagoCounts]

Out[5]=

シカゴの郵便番号の地域における，学齢期の子どもの人口についての組込みデータを取り出し，それらの値を外部の住宅・都市開発省のデータから取り出したHead Startの所在地数と合わせてプロットする．

In[6]:=

zipcodes = Normal@Keys[chicagoCounts]

Out[6]=

In[7]:=

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

In[8]:=

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

Out[8]=