Apa autokorelasi untuk jalan acak?

11

Sepertinya sangat tinggi, tapi ini berlawanan dengan intuisi saya. Bisakah seseorang tolong jelaskan? Saya sangat bingung dengan masalah ini dan akan menghargai penjelasan yang terperinci dan mendalam. Terima kasih banyak sebelumnya!

Baron
sumber

Jawaban:

11

(Saya menulis ini sebagai jawaban untuk posting lain, yang ditandai sebagai duplikat dari yang ini ketika saya sedang menyusunnya; saya pikir saya akan mempostingnya di sini daripada membuangnya. Sepertinya itu mengatakan hal-hal yang mirip dengan whuber's jawab tetapi cukup berbeda bahwa seseorang mungkin mendapatkan sesuatu dari yang ini.)

Sebuah random walk adalah dari bentuk yt=i=1tϵi

yt=yt1+ϵt

Cov(yt,yt1)=Cov(yt1+ϵt,yt1)=Var(yt1)

σt2=Var(yt)=tσϵ2

corr(yt,yt1)=σt12σt1σt=σt1σt=t1t=11t112t

tytyt1

ytyt1

masukkan deskripsi gambar di sini

yt120yt202218.520ytyt1y=xty=xt

Glen_b -Reinstate Monica
sumber
9

(x0,x1,x2,,xn)(x0,x1,,xn1)(x1,x2,,xn).

xi+1xixix0n(xi,xi+1)y=x±1y=x±11(n/2)2=n/4R2

R211n/4=14n.

n=1000R214/n

Angka


Berikut adalah Rkode yang menghasilkan gambar.

set.seed(17)
n <- 1e3
x <- cumsum((runif(n) <= 1/2)*2-1)          # Binomial random walk at x_0=0
rho <- format(cor(x[-1], x[-n]), digits=3)  # Lag-1 correlation

par(mfrow=c(1,2))
plot(x, type="l", col="#e0e0e0", main="Sample Path")
points(x, pch=16, cex=0.75,  col=hsv(1:n/n, .8, .8, .2))
plot(x[-n], x[-1], asp=1, pch=16, col=hsv(1:n/n, .8, .8, .2),
     main="Lag-1 Scatterplot",
     xlab="Current value", ylab="Next value")
mtext(bquote(rho == .(rho)))
whuber
sumber