Ω0nEnn
En={ω∈Ω|n∈ω}.
XM(ω)ωMXM−MXM
XM(ω)−M∈{0,1,2,3,4,5}XM−M=kωp(i)=1/6ii=1,2,3,4,5,6
Pr(XM−M=k)=∑j=k6Pr(EM+k−j)p(j)=16∑j=k6Pr(EM+k−j).
Pada titik ini kita dapat memperdebatkan secara heuristik bahwa, untuk perkiraan yang sangat baik untuk semua kecuali terkecil ,Ini karena nilai yang diharapkan dari gulungan adalah dan timbal baliknya harus menjadi frekuensi jangka panjang yang membatasi dan stabil dari nilai tertentu di .M
Pr(Ei)≈2/7.
(1+2+3+4+5+6)/6=7/2ω
Cara yang ketat untuk menunjukkan ini mempertimbangkan bagaimana bisa terjadi. Entah terjadi dan gulungan berikutnya adalah ; atau terjadi dan gulungan berikutnya adalah ; atau ... atau terjadi dan gulungan berikutnya adalah . Ini adalah partisi lengkap dari kemungkinan, dari manaEiEi−11Ei−22Ei−66
Pr(Ei)=∑j=16Pr(Ei−j)p(j)=16∑j=16Pr(Ei−j).
Nilai awal dari urutan ini adalah
Pr(E0)=1;Pr(E−i)=0,i=1,2,3,….
Plot melawan menunjukkan seberapa cepat peluang menetap ke konstan , ditunjukkan oleh garis putus-putus horisontal.Pr(Ei)i2/7
Ada teori standar dari urutan rekursif tersebut. Ini dapat dikembangkan dengan cara menghasilkan fungsi, rantai Markov, atau bahkan manipulasi aljabar. Hasil umum adalah bahwa rumus bentuk tertutup untuk ada. Pr(Ei) Ini akan menjadi kombinasi linear dari konstanta dan kekuatan dari akar polinomialith
x6−p(1)x5−p(2)x4−p(3)x3⋯−p(6)=x6−(x5+x4+x3+x2+x+1)/6.
Magnitudo akar terbesar adalah sekitar . Dalam representasi floating point presisi ganda, pada dasarnya nol. Oleh karena itu, untuk , kita dapat mengabaikan semuanya kecuali konstanta. Konstanta ini adalah .exp ( - 36,05 ) i » - 36,05 / - 0,314368 = 115 2 / 7exp(−0.314368)exp(−36.05)i≫−36.05/−0.314368=1152/7
Akibatnya, untuk , untuk semua tujuan praktis kita dapat mengambil , dari manaE M + k - j = 2 / 7M=300≫115EM+k−j=2/7
Pr(XM−M=(0,1,2,3,4,5))=(27)(16)(6,5,4,3,2,1).
Menghitung mean dan varian dari distribusi ini sangat mudah dan mudah.
Berikut ini adalah R
simulasi untuk mengkonfirmasi kesimpulan ini. Ini menghasilkan hampir 100.000 sekuens melalui , mentabulasikan nilai , dan menerapkan untuk menilai apakah hasilnya konsisten dengan yang sebelumnya. Nilai p (dalam hal ini) dari cukup besar untuk menunjukkan bahwa mereka konsisten.X 300 - 300 χ 2 0,1367M+5=305X300−300χ20.1367
M <- 300
n.iter <- 1e5
set.seed(17)
n <- ceiling((2/7) * (M + 3*sqrt(M)))
dice <- matrix(ceiling(6*runif(n*n.iter)), n, n.iter)
omega <- apply(dice, 2, cumsum)
omega <- omega[, apply(omega, 2, max) >= M+5]
omega[omega < M] <- NA
x <- apply(omega, 2, min, na.rm=TRUE)
count <- tabulate(x)[0:5+M]
(cbind(count, expected=round((2/7) * (6:1)/6 * length(x), 1)))
chisq.test(count, p=(2/7) * (6:1)/6)
[self-study]
tag & baca wiki -nya . Kemudian beri tahu kami apa yang Anda pahami sejauh ini, apa yang telah Anda coba & di mana Anda terjebak. Kami akan memberikan petunjuk untuk membantu Anda melepaskan diri.