Bạn có một phiên bản rời rạc của phân phối nhật ký âm, nghĩa là phân phối có hỗ trợ là và có pdf là .f ( t ) = - log t[ 0 , 1 ]f( t ) = - nhật kýt
Để thấy điều này, tôi sẽ xác định lại biến ngẫu nhiên của bạn để lấy các giá trị trong tập thay vì và gọi kết quả phân phối . Sau đó, yêu cầu của tôi là{ 0 , 1 , 2 , Hoài , N } T{ 0 , 1 / N, 2 / N, Lọ , 1 }{ 0 , 1 , 2 , ... , N}T
Pr ( T= tN) →- 1Nđăng nhập( tN)
vì trong khi được giữ (xấp xỉ) không đổi. tN, T → ∞tN
Đầu tiên, một thí nghiệm mô phỏng nhỏ chứng minh sự hội tụ này. Đây là một triển khai nhỏ của bộ lấy mẫu từ bản phân phối của bạn:
t_sample <- function(N, size) {
bounds <- sample(1:N, size=size, replace=TRUE)
samples <- sapply(bounds, function(t) {sample(1:t, size=1)})
samples / N
}
Đây là biểu đồ của một mẫu lớn được lấy từ bản phân phối của bạn:
ss <- t_sample(100, 200000)
hist(ss, freq=FALSE, breaks=50)
và đây là pdf logarit:
linsp <- 1:100 / 100
lines(linsp, -log(linsp))
Để xem tại sao sự hội tụ này xảy ra, hãy bắt đầu với biểu thức của bạn
Pr ( T= tN) = 1NΣj = tN1j
và nhân và chia choN
Pr ( T= tN) = 1NΣj= tNNj1N
Tổng cộng bây giờ là tổng Riemann cho hàm , được tích hợp từ đến . Đó là, đối với lớn , tg( x ) = 1x 1NtN1N
Pr ( T= tN) ≈ 1N∫1tN1xdx = - 1Nđăng nhập( tN)
đó là biểu hiện tôi muốn đến