我在使用此代码时遇到了一些问题。到目前为止,我有:
yes<-0
no<-0
sample<-20000
mean<-(10/12)
LowerBound<-LB
UpperBound<-UB
LB<-(mean-2)*sqrt(20/1872)
UB<-(mean+2)*sqrt(20/1872)
for(i in 1:sample){
sample<-rbeta(10,10,2)
LB<-(mean-2)*sqrt(20/1872)
UB<-(mean+2)*sqrt(20/1872)
}
但我收到
的错误eval(ei,envir)中的错误:object&#39; LB&#39;找不到
答案 0 :(得分:2)
你有事情不按规定。您将LowerBound
定义为LB
的值,但LB
之前未定义LB<-(mean-2)*sqrt(20/1872)
yes<-0
no<-0
sample<-20000
mean<-(10/12)
LB<-(mean-2)*sqrt(20/1872)
UB<-(mean+2)*sqrt(20/1872)
LowerBound<-LB
UpperBound<-UB
for(i in 1:sample){
sample<-rbeta(10,10,2)
LB<-(mean-2)*sqrt(20/1872)
UB<-(mean+2)*sqrt(20/1872)
}