>>745
95%信頼区間を累積分布関数の2.5%から97.5%にすれば、それらしい値はでるけど。
それだと、

> cdf_1(0.025) ; cdf_1(0.975)
[1] 9.590752
[1] 34.16961

で信頼区間幅が24.57885

Highest Denstiy Intervalの区間幅
> cdf_1(0.95+cdf(c))-c
[1] 24.02307
よりも広くなる。