Tono­Bungay

Plaintext for H. G. Wells' "Tono­Bungay"

(134733 words/753257 characters)

Examples

Basic Examples

Retrieve the ResourceObject:

In[1]:=
ResourceObject["Tono\[Hyphen]Bungay"]
Out[1]=

View the data:

In[2]:=
TextCases[ResourceData["Tono\[Hyphen]Bungay"], "Paragraph"][[30]]
Out[2]=

Visualization

Show the most frequently used verbs:

In[3]:=
BarChart[TakeLargest[
   Counts[TextCases[ResourceData["Tono\[Hyphen]Bungay"], "Verb"]], 
   20] // Reverse, BarOrigin -> Left, ChartLabels -> Automatic]
Out[3]=

Show the distribution of word lengths:

In[4]:=
With[{words = TextWords[ResourceData["Tono\[Hyphen]Bungay"]]},
 Histogram[(StringLength /@ words), PlotRange -> Full]]
Out[4]=

Wolfram Research, "Tono­Bungay" from the Wolfram Data Repository. (2016) https://doi.org/10.24097/wolfram.57231.data

Source Metadata

Data Downloads