Улучшение отобранных наборов данных со встроенными данными
Обширная коллекция встроенных социоэкономических данных в базе знаний Wolfram может быть использована в дополнениe к внешним источникам данных.
Рассмотреть данные о преимущественных местоположениях, импортированные из департамента США по жилищному строительству и городскому развитию.
![Click for copyable input](assets.ru/enhance-curated-datasets-with-built-in-data/In_81.png)
hs = ResourceData["Head Start Locations"][
All, {"CenterName", "CenterAddress", "CenterStateEntity",
"CenterCityEntity", "CenterZipCodeEntity", "Coordinates"}];
![Click for copyable input](assets.ru/enhance-curated-datasets-with-built-in-data/In_82.png)
Take[hs, 5]
![](assets.ru/enhance-curated-datasets-with-built-in-data/O_57.png)
Использовать оператор выборки для получения выборки местоположений.
![Click for copyable input](assets.ru/enhance-curated-datasets-with-built-in-data/In_83.png)
hsChicago =
hs[Select[#CenterCityEntity ===
Entity["City", {"Chicago", "Illinois", "UnitedStates"}] &]];
Изобразить их на карте Чикаго.
![Click for copyable input](assets.ru/enhance-curated-datasets-with-built-in-data/In_84.png)
GeoListPlot[hsChicago[All, #Coordinates &]]
![](assets.ru/enhance-curated-datasets-with-built-in-data/O_58.png)
Сгруппировать преимущественные местоположения и графически отобразить их распределение, основываясь на почтовом индексе.
![Click for copyable input](assets.ru/enhance-curated-datasets-with-built-in-data/In_85.png)
chicagoCounts = Length /@ GroupBy[hsChicago, #CenterZipCodeEntity &];
![Click for copyable input](assets.ru/enhance-curated-datasets-with-built-in-data/In_86.png)
GeoRegionValuePlot[chicagoCounts]
![](assets.ru/enhance-curated-datasets-with-built-in-data/O_59.png)
Получить встроенные данные о населении школьного возраста в Чикаго по почтовым индексам и графически отобразить полученные значения в преимущественных местоположениях, полученныx от внешних данных департамента по жилищному хозяйству и городскому развитию.
![Click for copyable input](assets.ru/enhance-curated-datasets-with-built-in-data/In_87.png)
zipcodes = Normal@Keys[chicagoCounts]
![](assets.ru/enhance-curated-datasets-with-built-in-data/O_60.png)
![Click for copyable input](assets.ru/enhance-curated-datasets-with-built-in-data/In_88.png)
chicagoMedian =
EntityValue[zipcodes,
EntityProperty["ZIPCode", "Population", {"Age" -> "SchoolAge"}],
"EntityAssociation"];
![](assets.ru/enhance-curated-datasets-with-built-in-data/O_61.png)