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