Poetry by e. e. cummings

Source Notebook

The poems of e. e. cummings that are in the public domain

Details

Properties include:
"Book"the title of the book whence comes the poem
"FirstLine"the first line of the poem
"Text"formatted text of the poem
"Title"title of the poem
"URLs"URLs related to the poem

Examples

Basic Examples (2) 

In[1]:=
ResourceData[\!\(\*
TagBox["\"\<Poetry by e. e. cummings\>\"",
#& ,
BoxID -> "ResourceTag-Poetry by e. e. cummings-Input",
AutoDelete->True]\)]
Out[1]=

Register the EntityStore:

In[2]:=
EntityRegister[ResourceData[\!\(\*
TagBox["\"\<Poetry by e. e. cummings\>\"",
#& ,
BoxID -> "ResourceTag-Poetry by e. e. cummings-Input",
AutoDelete->True]\)]]
Out[2]=

Read a short poem:

In[3]:=
With[{poem = RandomChoice[
    Select[EntityList["eecummingspoem"], Length[StringSplit[#["Text"], "\n"]] < 20 &]]},
 Column[{poem, poem["Text"]}]]
Out[3]=

Scope & Additional Elements (1) 

Books are grouped in EntityClasses:

In[4]:=
EntityClassList["eecummingspoem"]
Out[4]=
In[5]:=
EntityClass["eecummingspoem", "and"] // EntityList
Out[5]=

Visualizations

In[6]:=
text = StringJoin @@ EntityValue[EntityList["eecummingspoem"], "Text"];
words = TextWords[text];
In[7]:=
WordCloud[DeleteStopwords@words]
Out[7]=

Analysis (4) 

The distribution of lengths of first lines:

In[8]:=
Histogram[
 StringLength /@ EntityValue[EntityList["eecummingspoem"], "FirstLine"]]
Out[8]=

The number of words compared with the number of unique words:

In[9]:=
Length[words]
Out[9]=
In[10]:=
Length[Union[words]]
Out[10]=
In[11]:=
Length[Union[words]]/Length[words] // N
Out[11]=

The distribution of word lengths:

In[12]:=
Histogram[StringLength /@ words, PlotRange -> All]
Out[12]=

The ten longest "words":

In[13]:=
ReverseSortBy[words, StringLength][[;; 10]] // Column
Out[13]=

Wolfram Research, "Poetry by e. e. cummings" from the Wolfram Data Repository (2022)  

License Information

Public Domain

Data Resource History

Source Metadata

Data Downloads

Publisher Information