Presidential Inaugural Addresses

Presidential inaugural addresses through 2017

Complete text of presidential inaugural addresses 1789-2017

(5 columns, 58 rows)

Examples

Basic Examples

Retrieve the ResourceObject:

In[1]:=
ResourceObject["Presidential Inaugural Addresses"]
Out[1]=

View the data:

In[2]:=
ResourceData["Presidential Inaugural Addresses"][[1]]
Out[2]=

Visualization

View the lengths of inaugural addresses over time:

In[3]:=
DateListPlot[
 ResourceData["Presidential Inaugural Addresses"][
  All, {"Date", "Words"}], PlotRange -> All]
Out[3]=

Find which presidents delivered the longest addresses:

In[4]:=
TakeLargestBy[
 ResourceData["Presidential Inaugural Addresses"][SortBy[#Words &]][
  All, {"Name", "Date", "Words"}], "Words", 5]
Out[4]=

Wolfram Research, "Presidential Inaugural Addresses" from the Wolfram Data Repository. (2016) https://doi.org/10.24097/wolfram.00001.data

Source Metadata

Data Downloads