# NOT RUN {
require(DBI)
con <- dbConnect(AWR.Athena::Athena(), region='us-west-2',
S3OutputLocation='s3://nfultz-athena-staging',
Schema='default')
dbListTables(con)
dbGetQuery(con, "Select count(*) from sampledb.elb_logs")
# }
Run the code above in your browser using DataLab