I found that $AR(1)$ process $x_t=\phi x_{t-1}+\epsilon_t$ is not always Gaussian given Gaussian innovations $\epsilon_t$. This only happens when the $AR(1)$ model coefficient is very large. This goes against with the theory (If the white noise $\epsilon_t$ is a Gaussian process then $x_t$ is also a Gaussian process). How to explain this then? The following R codes gives that only $363$ out of the 1000 generations of $AR(1$) processes are gaussian process by the Shapiro-Wilk test
.
decision=c()
for (k in 1:1000){ # 1000 runs
phi=0.9 # AR(1) coefficient
x=0.5 # value of x_0
X=c() # generated AR(1) process
for (i in 1:1000){ # length of the process is 1000
x=phi*x+rnorm(1) # Gaussian innovations
X=c(X,x)
}
decision=c(decision,shapiro.test(X)$p.value) # Gaussian test
}
sum(decision>0.05)/1000 # percentage of Gaussian processes