This repository includes the R code used to simulate data and OpenBUGS used for model fitting to data