{[ promptMessage ]}

Bookmark it

{[ promptMessage ]}

Sim bugsdata inits modelfile shipsbug parameters

Info icon This preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: / tau) } # data y <- indat$accidents t <- indat$service N <- nrow(x) p <- ncol(x) data <- list("y", "t", "x", "N", "p") # inits inits <- function() { list(beta0 = 0, beta = c(0, 0, 0, 0, 0, 0, 0, 0), tau = 1) } # sim ships.sim = bugs(data, inits, model.file = ships.bug, parameters = c("beta0", "b...
View Full Document

{[ snackBarMessage ]}