Displaying 5 results from an estimated 5 matches for "modelinit".
Did you mean:
modelinits
2008 May 04
1
Residual resampling for non linear reg model
...07/data/manhours_surgical.dat", header=TRUE)#attach dataattach(manpower)B<-999#number of data pointsn<-dim(manpower)[1]#alpha level to use for the confidence limitsalpha<-0.05#matrix that's going to contain the bootstrap coefficientsboot.coef<-matrix(NA, B+1, 2)#fit the initial modelinit.values<-c(alpha=20,beta=0)model<-nls(manhours~cases/(alpha+(beta*cases)), start=init.values, trace=TRUE)pred<-predict(model)resid<-resid(model)#do the bootstrapfor (i in 1:B){ #resample the residuals resample.index<-sample(1:n,n,replace=T) resample.mp<-pred+resid[resample.index...
2011 Oct 24
0
Output from BRugs Doesn't Match That from OpenBUGS
.../Dissertation/R/Dyes/data.txt'
> n.chains = 1
> write.model(model, model.file.name)
> modelCheck(model.file.name)
model is syntactically correct
> modelData(model.data.name)
data loaded
> modelCompile(numChains=n.chains)
model compiled
> model.init.name = bugsInits(inits)
> modelInits(rep(model.init.name,n.chains))
Initializing chain 1: initial values loaded but chain contain uninitialized
variables
> modelGenInits()
initial values generated, model initialized
> modelUpdate(25000)
25000 updates took 1 s
> samplesSet(c("sigma2.with","sigma2.btw"))
mo...
2012 Jan 24
1
Error from Brugs "'r for windows gui front-end has stopped working''
Dear all,
I just try to run the example in R brugs packages, but not only once. Loop is added in this example. After several times (7, 11, or other random number), there is an error message "r for windows gui front-end has stopped working". This happened in two laptops with windows 7 and vista. I have tried different versions of R (2.14.1 and 2.13) and Brugs packages (0.7.1 and 0.7-5).
2009 Oct 06
2
R, Coda, and OpenBUGS
Hi All,
I am trying to figure out how to use R-Coda with the output from
OpenBugs. I have installed and loaded the packages BRugs and R2WinBUGS.
I have successfully run a simple Bayes model in WinBUGS using R2WinBUGS'
"bugs" and have used "read.bugs" to build the coda object. I can
successfully switch to OpenBugs and run the same model and get the basic
summary
2013 Jan 18
0
problem that arises after using the new version of "BRugs"
...;)
if ((100 * round(nBurnin/100) != nBurnin) | (100 * round(nIter/100) !=
nIter))
warning("chain lengths not multiples of 100; truncation may occur.")
modelCheck(modelFile)
modelData(bugsData(data))
modelCompile(numChains = 1)
modelInits(bugsInits(inits))
burninIncSize <- round(nBurnin/(nThin * 100))
for (i in 1:100) {
modelUpdate(burninIncSize, thin = nThin)
}
samplesSet(parametersToSave)
iterIncSize <- round(nIter/(nThin * 100))
for (i in 1:100) {
modelUpdate(iterIncSiz...