---
params: 
    title: ""
    Pars: "`r list()`"
    plotPars: "`r list()`"
    tabs: "`r TRUE`"
    its: " `r numeric()`"
    nyears: " `r numeric()`"
    proyears: " `r numeric()`"
    date: "`r Sys.Date()`"
title: "`r params$title`"
date: "`r params$date`"
output:
  html_document:
    toc: true
    toc_float: true
---

## Fleet Parameters
```{r, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

```{r FleetObj, echo=FALSE, include=FALSE}
library(knitr); library(dplyr)
rmd.files <- list.files()
rmd.files <- rmd.files[-match("Fleet.Rmd", rmd.files)]
rmd.files <- unique(rmd.files)

out <- NULL
for (rmd in rmd.files) {
  out <- c(out, knitr::knit_child(rmd))
}
```


```{r FleetObj_out, echo=FALSE, results="asis"}
cat(paste(out, collapse = '\n'))
```

