## ----knitr, echo=FALSE, cache = FALSE-----------------------------------------
suppressWarnings(library(knitr))
library(rmarkdown)
opts_chunk$set(echo = TRUE)