attach.all {R2WinBUGS} | R Documentation |
The database is attached to the R search path. See attach
for details.
attach.all(.a, overwrite = FALSE) detach.all()
.a |
A bugs object |
overwrite |
If TRUE , overwrites variables if necessary.
(The usual "attach" function in R only attaches the variables that are not yet defined.) |
attach.all
invisibly returns the environment
.
detach.all
detaches the environment
named .a
created by attach.all
.
Without detaching, do not use attach.all
on another bugs
object,
because instead of the given name, an object called .a
is attached.
Therefore strange things may happen...
# An example model file is given in: model.file <- file.path(.path.package("R2WinBUGS"), "model", "schools.txt") # Some example data (see ?schools for details): data(schools) J <- nrow(schools) y <- schools$estimate sigma.y <- schools$sd data <- list ("J", "y", "sigma.y") inits <- function(){ list(theta = rnorm(J, 0, 100), mu.theta = rnorm(1, 0, 100), sigma.theta = runif(1, 0, 100)) } parameters <- c("theta", "mu.theta", "sigma.theta") ## Not run: ## You may need to edit "bugs.directory", ## also you need write access in the working directory: schools.sim <- bugs(data, inits, parameters, model.file, n.chains = 3, n.iter = 1000, bugs.directory = "c:/Program Files/WinBUGS14/", working.directory = NULL) # Do some inferential summaries attach.all(schools.sim) # posterior probability that the coaching program in school A # is better than in school C: print(mean(theta[,1] > theta[,3])) # 50 # and school C's program: print(quantile(theta[,1] - theta[,3], c(.25, .75))) plot(theta[,1], theta[,3]) ## End(Not run)