Wolfram Language™

Acceda a contenido de Wikipedia usando entidades de Wolfram Language

Un gran y creciente número de entidades de Wolfram Knowledgebase han sido alineadas a fuentes externas, incluyendo Wikipedia.

Use WikipediaData para recuperar las páginas de estas entidades y tomar las primeras oraciones 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}];

Cree una colección formateada con los breves resúmenes acerca de dichas entidades.

In[3]:=

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

Out[3]=

Como segundo ejemplo, recupere artículos de Wikipedia acerca de cada uno de los integrantes anteriores de los Rolling Stones.

In[4]:=

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

Out[4]=

In[5]:=

stonesWiki = WikipediaData[stones];

Genere un collage de nubes de palabras, ponderado por el número de palabras en cada artículo.

In[6]:=

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

Out[6]=