¿Es estacionaria la serie de tiempo de pasajeros?

x <- AirPassengers
tseries::adf.test(x)
## Registered S3 method overwritten by 'quantmod':
##   method            from
##   as.zoo.data.frame zoo
## 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

Conclusión

Al ser P valor 0.01 < 0.05, se determina que la serie de tiempo original del modelo es estacionaria y, por ende, no es necesario aplicar diferenciaciones.Es posbile observar la estacionariedad en la siguiente gráfica.

plot(x, ylab="Passengers")