knitr::opts_chunk$set(echo=TRUE)

library(exa)
db <- exa_jdbc()

SQL

```{sql, connection=db} select table_schema, count(*) as num_tables from sys.exa_all_tables group by 1 order by 2 desc

## R variables

```r
var <- '%IA%'

```{sql, connection=db, max.print = 15} select * from sys.exa_time_zones where time_zone_name like ?var

## R graphics

```{sql, connection=db, output.var='out'}
select
    column_type_id,
    count(*)
from
    sys.exa_all_columns
group by
    1
plot(out)


reinholdsson/exa documentation built on May 27, 2019, 4:54 a.m.