library(exa) db <- exa_jdbc()
```{sql, connection = db} select * from regions limit 10
```r region <- 10
```{sql, connection = db, max.print = 3, tab.cap = 'Some Car Colors'} select * from regions where region > ?region order by 1 desc
```{sql, connection = db, output.var = 'car_colors'} select * from regions
knitr::kable(car_colors)
See also http://rmarkdown.rstudio.com/authoring_knitr_engines.html
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.