The Devil's Dictionary

Plaintext for Ambrose Bierce's "The Devil's Dictionary"

(60340 words/365122 characters)

Examples

Basic Examples

Retrieve the ResourceObject:

In[1]:=
ResourceObject["The Devil's Dictionary"]
Out[1]=

View the data:

In[2]:=
RandomChoice[
 TextCases[ResourceData["The Devil's Dictionary"], "Paragraph"]]
Out[2]=

Visualization

Show the most frequently used verbs:

In[3]:=
BarChart[TakeLargest[
   Counts[TextCases[ResourceData["The Devil's Dictionary"], "Verb"]], 
   20] // Reverse, BarOrigin -> Left, ChartLabels -> Automatic]
Out[3]=

Show the popularity of countries in a text:

In[4]:=
BarChart[TakeLargest[
   Counts[Interpreter["Country"][
     ToLowerCase /@ 
      TextCases[ResourceData["The Devil's Dictionary"], "Country"]]], 
   10] // Reverse, BarOrigin -> Left, ChartLabels -> Automatic]
Out[4]=

Wolfram Research, "The Devil's Dictionary" from the Wolfram Data Repository. (2016) https://doi.org/10.24097/wolfram.09985.data

Source Metadata

Data Downloads