Cargando la database desde github

Intento download una database almacenada en el repository de Github pero estoy APILADO. La database descargada está vacía y no tiene tablas dentro. Estoy intentando download esto en un file temporal, realizar algunas operaciones y eliminar esta database. ¿Puede alguien1 ayudarme? He intentado con 2 methods pero ninguno de ellos funcionó ..

Primera syntax del método:

# download database library(RCurl) options(RCurlOptions = list(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))) tmpDB <- getBinaryURL( "https://raw.githubusercontent.com/pbiecek/archivist/master/backpack.db") tfS <- tempfile() writeBin( tmpDB, tfS ) file.rename(from = tfS , to= "backpack.db") tfS <- sub( x = tfS, pattern ="\\\\file.+", replacement="") # perform local operations on database ... # delete downloaded database file.remove( paste0( tfS, "\\backpack.db" ) ) tfS <- NULL 

Segunda syntax del método:

  # download database GitUrl <- "https://raw.githubusercontent.com/pbiecek/archivist/master/backpack.db" LocDir <- tempfile() # LocDir <- paste0( LocDir, "\\") mb its not neccesary download.file( url = GitUrl, destfile = LocDir ) # operations on database # delete downloaded database file.remove( paste0( LocDir, "backpack.db" ) ) LocDir <- NULL 

Gracias por la ayuda !

Use el package RSQLite para acceder a la database descargada:

 myFile <- "https://raw.githubusercontent.com/pbiecek/archivist/master/backpack.db" library(RCurl) myData <- getBinaryURL(myFile, ssl.verifypeer = FALSE) writeBin(myData, 'test.db') library("RSQLite") drv <- dbDriver("SQLite") con <- dbConnect(drv, "test.db") dbListTables(con) > dbListTables(con) [1] "artifact" "tag" > dbListFields(con, "artifact") [1] "md5hash" "name" "createdDate" > dbListFields(con, "tag") [1] "artifact" "tag" "createdDate"