"HUMMER" <-
structure(as.integer(c(2493, 2654, 2987, 2837, 3157, 2837, 3157, 
1927, 2141, 2334, 2268, 1982, 2175, 2505, 2404, 2548, 2554, 2693, 
3814, 1864, 1866, 2220, 1700, 2964, 6754, 7476, 6367, 5806, 5640, 
5991, 8079, 5214, 5645)), .Tsp = c(2003.41666666667, 2006.08333333333, 
12), class = "ts")