test_GENERIC.Rmd

---
title: "Test"
author: "Gabe"
date: "November 03, 2016"
output: html_document
params:
  df: data.frame()
  a: ""
  b: ""
  c: "FALSE"
  d: ""
  e: ""
  f: ""
  g: ""
  h: ""
  i: ""
---

```{r setup, cache=FALSE, include=FALSE}
  t <- ifelse(tolower(params$c) == "true", TRUE, FALSE)
  e <- params$e
  knitr::opts_chunk$set(echo=FALSE, warning=FALSE, message=FALSE,
               results="markdown", prompt=FALSE, error=FALSE,
               fig.width=8, fig.height=5, cache=FALSE, output.format='html', eval=TRUE)
```

```{r "load packages", warning=TRUE, echo=TRUE, message=TRUE, error=TRUE}
# foo
```

```{r eval=t}
  print("Hello World")
```

```{r eval=(t & (e != ""))}
  print("Hello World 2")
```

```{r eval=(t & (e == ""))}
  print("Hello World 2")
```