hog <- structure(c(597, 509, 663, 751, 739, 598, 556, 594, 667, 776, 754, 689, 498, 643, 681, 778, 829, 751, 704, 633, 663, 709, 763, 681, 627, 667, 804, 782, 707, 653, 639, 672, 669, 729, 784, 842, 886, 784, 770, 783, 877, 777, 810, 957, 970, 903, 995, 1022, 998, 928, 1073, 1294, 1346, 1301, 1134, 1024, 1090, 1013, 1119, 1195, 1235, 1120, 1112, 1129, 1055, 787, 624, 612, 800, 1104, 1075, 1052, 1048, 891, 921, 1193, 1352, 1243, 1314, 1380, 1556, 1632), .Tsp = c(1867, 1948, 1), class = "ts")