---
title: "FlexTrees"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    vertical_layout: fill
    theme:
      version: 4
      bootswatch: minty
    source_code: embed
    favicon: img/tree-logo-resized.png
---
Home
====================================================================
```{r setup, include=FALSE}
library(flexdashboard)

# Tables
library(DT)

# Plotting
library(ggplot2)
library(plotly)

# Analysis
library(corrr)

# Other
library(emo)

#read in data
library(readxl)

pine_tbl <- read_excel("Data_1993.xlsx", sheet = 1)
```

Column {data-width=650}
-----------------------------------------------------------------------

### Corr/GGPair Plot - Exploratory Analysis

```{r}

```

Column {data-width=350} 
-----------------------------------------------------------------------

### Recipe

```{r}

```

### Variable Importance Plot

```{r}

```


### ROC Curve 

```{r}

```

### Gauge/Callout Box

```{r}

```


Data
====================================================================

```{r}
datatable(pine_tbl, caption = "Datatable for Pine Beetle Dataset")
```

CodeBook
====================================================================

```{r picture, echo = F, fig.cap = "CodeBook", out.width = '100%'}
knitr::include_graphics("img/pine-beetle-variables.png")
```