sourceCode.Rmd

---
title: "Source Code used for Systematic Literature Review & Analyses<br /><figure class=\"title\"><img src=\"Rlogo.png\" height=\"20%\" width=\"20%\" /></figure>"
---

<blockquote style="text-align: right;">"People who love statistics are damned to hell for all eternity, people who like R even more so."</blockquote>
<blockquote style="text-align: right;">`r tufte::quote_footer("A. Field, Miles, & Field (2012), p. xxv")`</blockquote>

<hr class="Bold" />


# `R` Code

```{r echo=FALSE, results='asis'}
p_r <- list.files(path = ".", pattern = ".*?\\.R$")
rsrcDocs <- paste0("[", p_r, "](", p_r, ")")
pander::pander(as.list(rsrcDocs))
```

# `SQL` Queries

```{r echo=FALSE, results='asis'}
p_sql <- list.files(path = "data/sql/RQDA-MAP-SQL/", pattern = ".*?\\.sql$")
sqlsrcDocs <- paste0("[", p_sql, "](data/sql/", p_sql, ")")
pander::pander(as.list(sqlsrcDocs))
```

# Data Files Generated from/for `R` code, `RQDA`, & `SQL` queries

```{r echo=FALSE, results='asis'}
p_dat <- list.files(path = "data/", pattern = ".*?\\.csv$")
datsrcDocs <- paste0("[", p_dat, "](", p_dat, ")")
pander::pander(as.list(datsrcDocs))
```