if (FALSE) {
db_air <- src_scidb("airlines")
db_air
}
if (FALSE) {
db_air <- dbConnect_scidb("airlines")
db_air
if (require(DBI)) {
dbListTables(db_air)
}
}
if (require(knitr)) {
opts_chunk$set(engine.opts = mysql_scidb("airlines"))
}
Run the code above in your browser using DataLab