draft.Rmd

---
title: "Fishy analysis"
author: "EcoDataScience"
date: "4/27/2021"
output: html_document
---

```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = FALSE,
                      warning = FALSE,
                      message = FALSE)

suppressPackageStartupMessages({
  library(here)
})
```

# Intro

Intro goes here

# Methods

We make plots and regressions

# Results

## Abundance through time

```{r}
knitr::include_graphics(here("results", "img", "time_series.png"))
```


## Latest abundance

```{r}
knitr::include_graphics(here("results", "img", "first_year.png"))
```


```{r}
# htmltools::includeMarkdown()
htmltools::includeHTML(path = here("results", "tab", "reg_table.html"))
```