Doing Bayesian Data Analysis: A Tutorial with R and BUGS