# NOT RUN {
library(DBI)
con <- dbConnect(RSQLite::SQLite())
dbWriteTable(con, "test", data.frame(a = 1))
dbListTables(con)
dbRemoveTable(con, "test")
dbListTables(con)
dbDisconnect(con)
# }
Run the code above in your browser using DataCamp Workspace