---
title: "Project 2 Code Check"
output: 
  flexdashboard::flex_dashboard:
    orientation: rows
    vertical_layout: fill
    source_code: embed
---

```{r setup, include=FALSE}

# load packages

library(flexdashboard)
library(tidyverse)
library(DT)

# load dataset

pine <- read.csv("Data_1993.csv")
```

# Page 1

Row 
-----------------------------------------------------------------------

### Raw Data Table

```{r}

datatable(pine)

```

Row {data-width=350}
-----------------------------------------------------------------------

### Chart B

```{r}

```

### Chart C

```{r}

```

# Page 2

Row {data-width=650}
-------------------------------------------------------------------------

### Chart D

```{r}

```


Row {data-width=350}
------------------------------------------------------------------------

### Chart E

```{r}

```

### Chart F

```{r}

```