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!

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


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)))
Dengan menggunakan situs kami, Anda mengakui telah membaca dan memahami Kebijakan Cookie dan Kebijakan Privasi kami.
Licensed under cc by-sa 3.0 with attribution required.