AirPassengers(datasets)
AirPassengers()所属R语言包:datasets
Monthly Airline Passenger Numbers 1949-1960
每月航空公司乘客数1949-1960
译者:生物统计家园网 机器人LoveR
描述----------Description----------
The classic Box & Jenkins airline data. Monthly totals of international airline passengers, 1949 to 1960.
经典盒詹金斯航空公司数据。国际航空公司的乘客每月汇总,1949年至1960年。
用法----------Usage----------
格式----------Format----------
A monthly time series, in thousands.
每月一次的系列,以千计。
源----------Source----------
Box, G. E. P., Jenkins, G. M. and Reinsel, G. C. (1976) Time Series Analysis, Forecasting and Control. Third Edition. Holden-Day. Series G.
盒,GEP的,詹金斯,通用汽车和Reinsel,GC(1976年)的时间序列分析,预测和控制。第三版。霍顿的一天。系列G。
举例----------Examples----------
## Not run: [#无法运行:]
## These are quite slow and so not run by example(AirPassengers)[#这是相当缓慢的,所以不能运行例如(AirPassengers)]
## The classic 'airline model', by full ML[#经典“航空模型”,通过充分的ML]
(fit <- arima(log10(AirPassengers), c(0, 1, 1),
seasonal = list(order=c(0, 1 ,1), period=12)))
update(fit, method = "CSS")
update(fit, x=window(log10(AirPassengers), start = 1954))
pred <- predict(fit, n.ahead = 24)
tl <- pred$pred - 1.96 * pred$se
tu <- pred$pred + 1.96 * pred$se
ts.plot(AirPassengers, 10^tl, 10^tu, log = "y", lty = c(1,2,2))
## full ML fit is the same if the series is reversed, CSS fit is not[#完整的ML合适的是相同的,如果颠倒系列,CSS适合]
ap0 <- rev(log10(AirPassengers))
attributes(ap0) <- attributes(AirPassengers)
arima(ap0, c(0, 1, 1), seasonal = list(order=c(0, 1 ,1), period=12))
arima(ap0, c(0, 1, 1), seasonal = list(order=c(0, 1 ,1), period=12),
method = "CSS")
## Structural Time Series[#结构性时间序列]
ap <- log10(AirPassengers) - 2
(fit <- StructTS(ap, type= "BSM"))
par(mfrow=c(1,2))
plot(cbind(ap, fitted(fit)), plot.type = "single")
plot(cbind(ap, tsSmooth(fit)), plot.type = "single")
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注:
注1:为了方便大家学习,本文档为生物统计家园网机器人LoveR翻译而成,仅供个人R语言学习参考使用,生物统计家园保留版权。
注2:由于是机器人自动翻译,难免有不准确之处,使用时仔细对照中、英文内容进行反复理解,可以帮助R语言的学习。
注3:如遇到不准确之处,请在本贴的后面进行回帖,我们会逐渐进行修订。
|