library("forecast")
## Registered S3 method overwritten by 'quantmod':
## method from
## as.zoo.data.frame zoo
library("tseries")
x <- AirPassengers
tseries::adf.test(x)
## Warning in tseries::adf.test(x): p-value smaller than printed p-value
##
## Augmented Dickey-Fuller Test
##
## data: x
## Dickey-Fuller = -7.3186, Lag order = 5, p-value = 0.01
## alternative hypothesis: stationary
La estacionariedad se ve evidenciada cuando el P-valor es menor que 0.05 y como en este ejercicio el p-valor es 0.01, la serie de tiempo posee estacionariedad.