structure(list(Year = 1882:2023, Temp = c(-0.11, -0.17, -0.28,
-0.33, -0.31, -0.36, -0.17, -0.11, -0.35, -0.23, -0.28, -0.32,
-0.32, -0.23, -0.11, -0.11, -0.27, -0.18, -0.08, -0.15, -0.27,
-0.36, -0.47, -0.26, -0.22, -0.38, -0.42, -0.48, -0.43, -0.44,
-0.36, -0.34, -0.15, -0.14, -0.35, -0.46, -0.29, -0.27, -0.27,
-0.18, -0.28, -0.26, -0.27, -0.22, -0.1, -0.21, -0.19, -0.36,
-0.15, -0.09, -0.16, -0.28, -0.12, -0.19, -0.14, -0.02, 0, -0.01,
0.13, 0.19, 0.07, 0.09, 0.21, 0.09, -0.07, -0.02, -0.1, -0.11,
-0.17, -0.07, 0.01, 0.08, -0.13, -0.14, -0.19, 0.05, 0.06, 0.03,
-0.03, 0.06, 0.03, 0.05, -0.2, -0.11, -0.06, -0.02, -0.08, 0.05,
0.03, -0.08, 0.01, 0.16, -0.07, -0.01, -0.1, 0.18, 0.07, 0.16,
0.26, 0.32, 0.14, 0.31, 0.16, 0.12, 0.18, 0.32, 0.39, 0.27, 0.45,
0.4, 0.22, 0.23, 0.32, 0.45, 0.33, 0.46, 0.61, 0.38, 0.39, 0.53,
0.63, 0.62, 0.53, 0.68, 0.64, 0.66, 0.54, 0.65, 0.72, 0.61, 0.65,
0.67, 0.74, 0.9, 1.01, 0.92, 0.85, 0.98, 1.01, 0.84, 0.89, 1.01
), President = c("Arthur", "Arthur", "Arthur", "Arthur/Cleveland1",
"Cleveland1", "Cleveland1", "Cleveland1", "Cleveland1/Harrison",
"Harrison", "Harrison", "Harrison", "Harrison/Cleveland2", "Cleveland2",
"Cleveland2", "Cleveland2", "Cleveland2/McKinley", "McKinley",
"McKinley", "McKinley", "McKinley/Roosevelt", "Roosevelt", "Roosevelt",
"Roosevelt", "Roosevelt", "Roosevelt", "Roosevelt", "Roosevelt",
"Roosevelt/Taft", "Taft", "Taft", "Taft", "Taft/Wilson", "Wilson",
"Wilson", "Wilson", "Wilson", "Wilson", "Wilson", "Wilson", "Wilson/Harding",
"Harding", "Harding/Coolidge", "Coolidge", "Coolidge", "Coolidge",
"Coolidge", "Coolidge", "Coolidge/Hoover", "Hoover", "Hoover",
"Hoover", "Hoover/FDR", "FDR", "FDR", "FDR", "FDR", "FDR", "FDR",
"FDR", "FDR", "FDR", "FDR", "FDR", "FDR/Truman", "Truman", "Truman",
"Truman", "Truman", "Truman", "Truman", "Truman", "Truman/Eisenhower",
"Eisenhower", "Eisenhower", "Eisenhower", "Eisenhower", "Eisenhower",
"Eisenhower", "Eisenhower", "Eisenhower/Kennedy", "Kennedy",
"Kennedy/Johnson", "Johnson", "Johnson", "Johnson", "Johnson",
"Johnson", "Johnson/Nixon", "Nixon", "Nixon", "Nixon", "Nixon",
"Nixon/Ford", "Ford", "Ford", "Ford/Carter", "Carter", "Carter",
"Carter", "Carter/Reagan", "Reagan", "Reagan", "Reagan", "Reagan",
"Reagan", "Reagan", "Reagan", "Reagan/BushHW", "BushHW", "BushHW",
"BushHW", "BushHW/Clinton", "Clinton", "Clinton", "Clinton",
"Clinton", "Clinton", "Clinton", "Clinton", "Clinton/BushW",
"BushW", "BushW", "BushW", "BushW", "BushW", "BushW", "BushW",
"BushW/Obama", "Obama", "Obama", "Obama", "Obama", "Obama", "Obama",
"Obama", "Obama/Trump", "Trump", "Trump", "Trump", "Trump/Biden",
"Biden", "Biden"), Party = c("R", "R", "R", "R/D", "D", "D",
"D", "D/R", "R", "R", "R", "R/D", "D", "D", "D", "D/R", "R",
"R", "R", "R", "R", "R", "R", "R", "R", "R", "R", "R", "R", "R",
"R", "R/D", "D", "D", "D", "D", "D", "D", "D", "D/R", "R", "R",
"R", "R", "R", "R", "R", "R", "R", "R", "R", "R/D", "D", "D",
"D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D", "D",
"D", "D", "D", "D", "D/R", "R", "R", "R", "R", "R", "R", "R",
"R/D", "D", "D", "D", "D", "D", "D", "D", "D/R", "R", "R", "R",
"R", "R", "R", "R", "R/D", "D", "D", "D", "D/R", "R", "R", "R",
"R", "R", "R", "R", "R", "R", "R", "R", "R/D", "D", "D", "D",
"D", "D", "D", "D", "D/R", "R", "R", "R", "R", "R", "R", "R",
"R/D", "D", "D", "D", "D", "D", "D", "D", "D/R", "R", "R", "R",
"R/D", "D", "D")), row.names = 3:144, class = "data.frame")