Wolfram Data Repository

Immediate Computable Access to Curated Contributed Data

Presidential Inaugural Addresses

Source Notebook

Presidential inaugural addresses through 2021

Originator: The American Presidency Project

Details

Complete text of presidential inaugural addresses 1789-2021

(5 columns, 59 rows)

Examples

Basic Examples (1) 

View the data:

In[1]:=
ResourceData[\!\(\* TagBox["\"\<Presidential Inaugural Addresses\>\"", #& , BoxID -> "ResourceTag-Presidential Inaugural Addresses-Input", AutoDelete->True]\)]
Out[1]=

Visualization (2) 

View the lengths of inaugural addresses over time:

In[2]:=
DateListPlot[ResourceData[\!\(\* TagBox["\"\<Presidential Inaugural Addresses\>\"", #& , BoxID -> "ResourceTag-Presidential Inaugural Addresses-Input", AutoDelete->True]\)][All, {"Date", "Words"}], PlotRange -> All]
Out[2]=

Find which presidents delivered the longest addresses:

In[3]:=
TakeLargestBy[ResourceData[\!\(\* TagBox["\"\<Presidential Inaugural Addresses\>\"", #& , BoxID -> "ResourceTag-Presidential Inaugural Addresses-Input", AutoDelete->True]\)][SortBy[#Words &]][ All, {"Name", "Date", "Words"}], "Words", 5]
Out[3]=

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

Data Resource History

  • Date Created:

Data Downloads

Publisher Information

  • Prepared for the Wolfram Data Repository By: Wolfram Research
  • Publisher of Record: Wolfram Research