# PROBLEM 7
# Generate n = 1000 observations from each of the models in the previous question and comment on the important patterns in the ACF and PACF plots
library(astsa)
ar = arima.sim( list(order = c( 1, 0, 0), ar = 0.6), n = 1000)
ma = arima.sim( list(order = c( 0, 0, 1), ma = 0.9), n = 1000)
arma = arima.sim( list(order = c( 1, 0, 1), ar = 0.6, ma = 0.9), n = 1000)
acf2(ar)

## [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13]
## ACF 0.61 0.36 0.19 0.11 0.06 0.05 0.06 0.06 0.03 0.02 -0.02 -0.07 -0.08
## PACF 0.61 -0.01 -0.04 0.02 0.00 0.03 0.04 0.00 -0.02 0.00 -0.05 -0.07 0.00
## [,14] [,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24] [,25]
## ACF -0.08 -0.04 -0.03 -0.03 -0.02 -0.02 -0.05 -0.07 -0.08 -0.05 -0.03 0.01
## PACF -0.01 0.03 -0.02 0.00 0.00 0.00 -0.05 -0.02 -0.02 0.02 0.00 0.03
## [,26] [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [,36] [,37]
## ACF 0.04 0.00 -0.03 -0.07 -0.08 -0.08 -0.05 -0.05 -0.07 -0.07 -0.07 -0.07
## PACF 0.02 -0.07 -0.01 -0.06 -0.01 -0.01 0.02 -0.05 -0.05 0.00 -0.02 -0.01
## [,38] [,39] [,40] [,41] [,42]
## ACF -0.06 -0.01 0.02 0.01 0.00
## PACF 0.01 0.06 0.01 -0.04 -0.01
acf2(ma)

## [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13]
## ACF 0.52 0.03 0.01 0.00 -0.02 0.03 0.04 0.00 0.01 0.02 0.01 0.02 0.01
## PACF 0.52 -0.33 0.25 -0.21 0.16 -0.06 0.06 -0.08 0.09 -0.08 0.08 -0.06 0.04
## [,14] [,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24] [,25]
## ACF -0.02 -0.01 0.01 -0.03 -0.05 -0.03 -0.04 -0.03 0.02 0.04 0.03 0.03
## PACF -0.07 0.08 -0.06 -0.01 -0.02 0.00 -0.04 0.05 0.00 0.03 0.02 0.00
## [,26] [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [,36] [,37]
## ACF -0.03 -0.07 -0.03 -0.04 -0.06 0.00 0.06 0.04 0.01 0.01 0.03 0.02
## PACF -0.08 0.02 -0.02 -0.05 -0.01 0.06 0.01 0.02 -0.03 0.05 0.01 0.00
## [,38] [,39] [,40] [,41] [,42]
## ACF -0.02 -0.06 -0.05 -0.02 -0.01
## PACF -0.06 -0.02 0.00 -0.01 0.01
acf2(arma)

## [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13]
## ACF 0.82 0.54 0.38 0.26 0.17 0.12 0.09 0.04 0.02 0.01 0.00 0.01 0.00
## PACF 0.82 -0.40 0.30 -0.27 0.21 -0.11 0.05 -0.10 0.10 -0.09 0.11 -0.08 0.04
## [,14] [,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24] [,25]
## ACF -0.01 -0.01 0.00 0.01 0.01 -0.01 -0.03 -0.04 -0.06 -0.08 -0.09 -0.09
## PACF -0.04 0.04 -0.02 0.04 -0.05 -0.02 0.00 -0.02 -0.02 -0.04 0.00 0.02
## [,26] [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [,36] [,37]
## ACF -0.07 -0.06 -0.04 -0.03 -0.01 0.01 0.02 0.02 0.00 -0.01 -0.01 -0.02
## PACF 0.00 0.02 -0.03 0.03 0.03 0.00 0.00 -0.03 -0.03 0.04 -0.02 -0.03
## [,38] [,39] [,40] [,41] [,42]
## ACF -0.05 -0.06 -0.06 -0.07 -0.06
## PACF -0.04 0.02 -0.02 0.00 -0.01