library(mvabund) ## Load a dataset from the mvabund package
data(spider)
y <- spider$abun
n <- nrow(y); p <- ncol(y);
## Create a boral "null" model JAGS script, where distributions alternative
## between Poisson and negative distributions
## across the rows of y...cool!
make.jagsboralnullmodel(family = rep(c("poisson","negative.binomial"),n),
site.eff = TRUE, X.eff = TRUE, n, p)
## Create a boral "null" model JAGS script, where distributions are all negative
## binomial distributions and covariates will be included!
make.jagsboralnullmodel(family = rep("negative.binomial",length=n),
site.eff = FALSE, X.eff = TRUE, n, p)
Run the code above in your browser using DataLab