ベイジアンメタアナリシスの以前の分布を述べようとしています。
確率変数に関する次の情報があります。
- 2つの観察:3.0、3.6
- 変数を研究する科学者は、であり、6という高い値はゼロ以外の確率を持つと私に言っています。
私は、最適化に次のアプローチを使用している(ログ-Nのモードを= :
prior <- function(parms, x, alpha) {
a <- abs(plnorm(x[1], parms[1], parms[2]) - (alpha/2))
b <- abs(plnorm(x[2], parms[1], parms[2]) - (1-alpha/2))
mode <- exp(parms[1] - parms[2]^2)
c <- abs(mode-3.3)
return(a + b + c)
}
v = nlm(prior,c(log(3.3),0.14),alpha=0.05,x=c(2.5,7.5))
x <- seq(1,10,0.1)
plot(x, dlnorm(x, v$estimate[1], v$estimate[2]))
abline(v=c(2.5,7.5), lty=2) #95%CI
図では、これが返す分布を見ることができますが、私が描いた赤い線のようなものを見つけたいと思います。
これは、対数正規、ガンマ、または正規を使用して同じ形状の分布を提供し、およびP (X = 6 )< 0.01の分布になります。つまり、
plnorm(c(5,6), v$estimate[1],v$estimate[2])
誰かが代替案を提案できますか?私は混合よりも単一の分布に固執したいと思います。
ありがとう!