Displaying 5 results from an estimated 5 matches for "bugsinits".
2008 Dec 09
1
expected variable name error pos 98349 WInBUGS in R
...AUSEA"=NAUSEA,"SITEID"=SITEID,"n.samples"=n.samples,"n.sites"=n.sites,"n.params"=n.params)
> > bugsData(data.bugs, fileName = "nauseadata.txt")
> > inits.bugs <- list("alpha"=rep(0,n.sites), "tau"=1)
> > bugsInits(list(inits.bugs), fileName = "nauseainit.txt")
> > modelCheck("nausea_random.txt") # check model file
> model is syntactically correct
> > modelData("nauseadata.txt") # read data file
> expected variable name error pos 98349...
2008 Dec 07
1
Reading txt file in R
...t;BMI"=BMI, "USUBJID"=USUBJID,"n.samples"=n.samples,"n.sites"=n.sites,"n.params"=n.params)
bugsData(data.bugs, fileName = "nauseadata.txt")
inits.bugs <- list("b"=rep(0,n.params),"alpha"=rep(0,n.sites), "tau"=1)
bugsInits(list(inits.bugs), fileName = "nauseainit.txt")
> modelCheck("nausea_random.txt") # check model file
model is syntactically correct
> modelData("nauseadata.txt") # read data file
expected variable name error pos 134022
Model statement:
m...
2008 Dec 08
1
Reading txt file in R to run Random Intercept Model
...;-
list("NAUSEA"=NAUSEA,"SITEID"=SITEID,"n.samples"=n.samples,"n.sites"=n.sites,"n.params"=n.params)
> bugsData(data.bugs, fileName = "nauseadata.txt")
> inits.bugs <- list("alpha"=rep(0,n.sites), "tau"=1)
> bugsInits(list(inits.bugs), fileName = "nauseainit.txt")
> modelCheck("nausea_random.txt") # check model file
model is syntactically correct
> modelData("nauseadata.txt") # read data file
expected variable name error pos 98349
*MODEL*
model
{
for...
2011 Oct 24
0
Output from BRugs Doesn't Match That from OpenBUGS
...C:/Users/ethan/Desktop/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","...
2013 Jan 18
0
problem that arises after using the new version of "BRugs"
...(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(iterIncSize, thin = n...