data-raw/internet.R

internet <- stats::ts(c(88, 84, 85, 85, 84, 85, 83, 85, 88, 89, 91, 99,
104, 112, 126, 138, 146, 151, 150, 148, 147, 149, 143, 132, 131,
139, 147, 150, 148, 145, 140, 134, 131, 131, 129, 126, 126, 132,
137, 140, 142, 150, 159, 167, 170, 171, 172, 172, 174, 175, 172,
172, 174, 174, 169, 165, 156, 142, 131, 121, 112, 104, 102, 99,
99, 95, 88, 84, 84, 87, 89, 88, 85, 86, 89, 91, 91, 94, 101, 110,
121, 135, 145, 149, 156, 165, 171, 175, 177, 182, 193, 204, 208,
210, 215, 222, 228, 226, 222, 220),s=1,f=1)
usethis::use_data(internet, overwrite=TRUE)
robjhyndman/fma documentation built on Nov. 29, 2023, 11:46 p.m.