してみましょう独立同一のパラメータを持つ指数関数分布することが。次に、指定された、これらの値の合計
は、確率密度関数を使用したアーラン分布に従います
私は分布に興味があります。ここで、は確率変数で、指数分布する場合、
つまり、は指数分布で切り捨てられます。分布の導出に失敗しましたが、おそらくもっと簡単な方法があります:
しかし、この密度はそれほど醜くはないように、サンプリングして目を見張るだけで私には見えます。
iter <- 20000
lambda_a <- 1
lambda <- 2
df <- data.frame(tau=rep(NA, iter), a=rep(NA, iter))
for(i in 1:iter){
set.seed(i)
a <- rexp(1, rate = lambda_a)
s <- cumsum(rexp(500, rate = lambda))
df[i,] <- c(max(s[1], s[s<a]), a)
}
library(tidyverse)
ggplot(df %>% gather(), aes(x = value, fill = key)) +
geom_density(alpha = .3) + theme_bw()