Wolfram 언어™

Wolfram 언어 엔티티를 사용한 Wikipedia 콘텐츠 접근

지속적으로 성장하고 있는 수많은 Wolfram Knowledgebase의 엔티티는 새로운 엔티티의 추가 뿐만 아니라, Wikipedia 등의 외부 소스와 함께 사용할 수 있도록 정렬에 힘쓰고 있습니다.

WikipediaData를 사용하여 이러한 엔티티의 페이지를 추출하고, 각 페이지의 첫번째 문장을 취합니다.

In[1]:=

entities = {Entity["Person", "JohnLennon::cpwy3"], Entity["Species", "Species:AcinonyxJubatus"], Entity["City", {"NewYork", "NewYork", "UnitedStates"}], Entity["MusicAct", "PinkFloyd::7523m"], Entity["AdministrativeDivision", {"Florida", "UnitedStates"}]};

In[2]:=

summaries = Table[{ent, First[TextSentences[WikipediaData[ent]]]}, {ent, entities}];

이러한 실체에 대한 짧은 텍스트에 의한 설명 컬렉션을 만들 수 있습니다.

In[3]:=

Panel[TextGrid[summaries, Background -> {Automatic, {{LightOrange, White}}}, Alignment -> Left], ImageSize -> 500]

Out[3]=

두 번째 예로, 롤링 스톤즈의 과거 멤버 각각에 대한 Wikipedia 아티클을 추출합니다.

In[4]:=

stones = Entity["MusicAct", "TheRollingStones::99n5n"]["Members"]

Out[4]=

In[5]:=

stonesWiki = WikipediaData[stones];

아티클의 단어 숫자로 가중치를 준 워드 클라우드의 콜라주를 생성합니다.

In[6]:=

weightedStonesClouds = WordCount[#] -> WordCloud[DeleteStopwords[#]] & /@ DeleteMissing[stonesWiki]; ImageCollage[weightedStonesClouds, Method -> "Columns"]

Out[6]=