Figure S.5. 3: R code and priors files used to create the model