X
パラメータ で指数分布しますlambda=0.5
。
の分布がわからPr(1/mean(X)< K)=0.95
ないので1/mean(X)
、次のコードで分布を生成します。
m<-c()
exponentialFunc<-function(n,lambda,nsim){
for(i in seq(nsim)){
x<-rexp(n,lambda)
y<-mean(x)
m<-c(m,1/y)
}
m
}
の配布m
です1/mean(x)
。
この関数を byexponentialFunc(10,0.5,10000)
と呼び、m の一連の値を返します。しかし、出力
を使用したときに0.95の確率を持つこの分布の分位数を見つけたいので、quantile(m,0.95)
> quantile(m,0.95)
95%
NA
なぜ生成するのNA
ですか?私のコードに何か問題がありますか?