Please install and load the following packages as follows:
install.packages("astsa")
library(astsa)
Run the following code for questions #1 through #10:
set.seed(150)
x <- arima.sim(model = list(ar = c(0.3), ma = c(0.1)), mean = 0, n = 200)
Try to fit the AR(1), MA(1), ARMA(1, 1), and ARMA(1, 2) models to the series ‘x’. Then, answer the following questions (#1 through #10).



The coefficient of AR component in AR(1) model is:
The coefficient of MA component in MA(1) model is:
The coefficient of AR(1) component in ARMA(1, 1) model is:
The coefficient of MA(2) component in ARMA(1, 2) model is: