if (FALSE) { # requireNamespace("RSQLite", quietly = TRUE)
conn <- get_connection()
dplyr::copy_to(conn, mtcars, name = "mtcars", temporary = FALSE)
dplyr::copy_to(conn, iris, name = "iris")
table_exists(conn, "mtcars") # TRUE
table_exists(conn, "iris") # FALSE
table_exists(conn, "temp.iris") # TRUE
close_connection(conn)
}
Run the code above in your browser using DataLab