완전 채식주의자가 살기 좋은 도시는?

Factual API에 연결하여 도시에 대한 정보를 얻습니다.

In[1]:=

factual = ServiceConnect["Factual"]

Out[1]=

두 도시의 채식주의와 채식주의 음식 관련 위치를 찾습니다.

In[2]:=

resultsSeattle = factual["PlacesDataset", "Locality" -> Entity["City", {"Seattle", "Washington", "UnitedStates"}], "Query" -> "Vegan and vegetarian food", MaxItems -> 300]; resultsHonolulu = factual["PlacesDataset", "Locality" -> Entity["City", {"Honolulu", "Hawaii", "UnitedStates"}], "Query" -> "Vegan and vegetarian food", MaxItems -> 300];

장소의 수와 밀도를 얻습니다.

In[3]:=

TextGrid[{{"City", "Area", "Number of locations", "Density"}, {Entity[ "City", {"Seattle", "Washington", "UnitedStates"}], Entity["City", {"Seattle", "Washington", "UnitedStates"}]["Area"], Length[resultsSeattle], Length[resultsSeattle]/ Entity["City", {"Seattle", "Washington", "UnitedStates"}][ "Area"]}, {Entity[ "City", {"Honolulu", "Hawaii", "UnitedStates"}], Entity["City", {"Honolulu", "Hawaii", "UnitedStates"}]["Area"], Length[resultsHonolulu], Length[resultsHonolulu]/ Entity["City", {"Honolulu", "Hawaii", "UnitedStates"}]["Area"]}}, Frame -> All]

Out[3]=