Estoy escribiendo en una presentación usando Knitr, Markdown y Slidify. Las diapositivas se tratarán en parte con Knitr como tema, razón por la cual me he detenido ante un problema. No puedo incluir, por ejemplo, un fragmento de Knitr-markdown para mostrarlo en la diapositiva. Siempre se interpretará en la primera ejecución, incluso si hago algo como esto:

```
```{r eval = F, include = T}

```
``` 

¿Cómo puedo evitar que un fragmento se interprete y, por lo tanto, se elimine de la salida final para poder mostrar cómo se estructura un fragmento cuando se utiliza Markdown y Knitr?

EDITAR:

Probé la versión de ustedes @Ramnath e inventé las siguientes diapositivas:

## Testslide 1

```{r verbatimchunk, verbatim = TRUE}
x = 1 + 1
x
```

```{r regularchunk}
x = 1 + 1
x
```

---

## Testslide 2

```{r verbatimchunk_2, verbatim = TRUE}
x = 1 + 1
x
```

* element 1
* element 2

---

## Testslide 3

* element 1
* element 2


```{r verbatimchunk_3, verbatim = TRUE}
x = 1 + 1
x
```

Las dos primeras diapositivas funcionan bien, pero la última es el problema. Si hay una lista con viñetas antes del fragmento textual, se interpreta como de costumbre. Así que es lo mismo que con la primera solución de @Scott. No entiendo esto.

EDITAR 2/3 (Solución de trabajo)

```{r echo = FALSE}
require(knitr)
hook_source_def = knit_hooks$get('source')
knit_hooks$set(source = function(x, options){
  if (!is.null(options$verbatim) && options$verbatim){
    opts = gsub(",\\s*verbatim\\s*=\\s*TRUE\\s*", "", options$params.src)
    bef = sprintf('\n\n    ```{r %s}\n', opts, "\n")
    stringr::str_c(bef, paste(knitr:::indent_block(x, "    "), collapse = '\n'), "\n    ```\n")
  } else {
     hook_source_def(x, options)
  }
})
```

## Testslide

* Element one
* Element two


Some text here breaks list environment:

```{r verbatim = T}
any code
```