R and JAGS code accompanying the ICPSR summer program course on Applied Bayesian Modeling