## ---- echo = FALSE, message = FALSE-------------------------------------------
# Global options
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path="fig/"
)
options(tibble.print_min = 4L, tibble.print_max = 4L)