Acesse o conteúdo da Wikipedia usando entidades da Wolfram Language

Um grande e crescente número de entidades da Wolfram Knowledgebase foram alinhados às fontes externas, incluindo a Wikipedia.

Use WikipediaData para extrair as páginas dessas entidades e pegar a primeira frase de cada página.

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}];

Crie uma coleção formatada de resumos de textos sobre estas entidades.

In[3]:=

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

Out[3]=

Como um segundo exemplo, extraia artigos da Wikipedia sobre cada um dos integrantes dos Rolling Stones.

In[4]:=

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

Out[4]=

In[5]:=

stonesWiki = WikipediaData[stones];

Gere uma colagem de nuvens de palavras, ponderada pelo número de palavras do artigo.

In[6]:=

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

Out[6]=