## ----setup, include=FALSE----------------------------------------------------- library(knitr) opts_chunk$set(warning=FALSE, message=FALSE, eval=FALSE, out.width = "80%", fig.align = "center", collapse = TRUE, comment = "#>")