---
title: "html2"
author: "name"
date: "`r Sys.Date()`"
output: 
  bookdown::html_document2:
    df_print: kable
    toc: true
    config:
      toc:
        collapsed: 2
    toc_depth: 4
    toc_float: true
    
    theme: default
    highlight: tango
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(
  # These options can be set to FALSE (capitalization matters).
  echo = TRUE,    # show code
  message = TRUE, # show messages
  warning = TRUE, # show warnings
  error = TRUE,   # show errors
  comment = ""    # don't show ## with printed output
)

options(digits = 3) # round to three digits
```

```{r tidyverse, include=FALSE, message=FALSE}
library(conflicted)
conflict_prefer("filter", "dplyr", quiet = TRUE)
conflict_prefer("lag", "dplyr", quiet = TRUE)
suppressPackageStartupMessages(library(tidyverse))

# suppress "`summarise()` has grouped output by " messages
options(dplyr.summarise.inform = FALSE)
```

```{r tidymodels, include=FALSE}
suppressPackageStartupMessages(library(tidymodels))
tidymodels_prefer()
```

# 
