Persuasion

Plaintext for Jane Austen's "Persuasion"

(83345 words/466813 characters)

Examples

Basic Examples

Retrieve the ResourceObject:

In[1]:=
ResourceObject["Persuasion"]
Out[1]=

View the data:

In[2]:=
TextCases[ResourceData["Persuasion"], "Paragraph"][[50]]
Out[2]=

Visualization

Show the most frequently used of proper nouns:

In[3]:=
BarChart[TakeLargest[
   Counts[TextCases[ResourceData["Persuasion"], "ProperNoun"]], 20] //
   Reverse, BarOrigin -> Left, ChartLabels -> Automatic]
Out[3]=

Show the distribution of sentence lengths:

In[4]:=
With[{sentences = TextSentences[ResourceData["Persuasion"]]},
 Histogram[(Length /@ (TextWords /@ sentences)), PlotRange -> Full]]
Out[4]=

Wolfram Research, "Persuasion" from the Wolfram Data Repository. (2016) https://doi.org/10.24097/wolfram.82111.data

Source Metadata

Data Downloads