Disconnessione della connessione src_tbls in dplyr

Question

C'è un modo per forzare la disconnessione di un oggetto in dplyr simile a RPostgreSQL::dbDisconnect?

Vedi per esempio:

> src_temp <- src_postgres(dbname = "temp", host = "127.0.0.1", port = 5432, user = "x", password = "y") 
Error in postgresqlNewConnection(drv, ...) : 
    RS-DBI driver: (cannot allocate a new connection -- maximum of 16 connections already opened) 

Come nota a margine, lo fa disconnessione automatica abbastanza rapidamente dopo pochi secondi:

Auto-disconnecting postgres connection (3734, 26) 

dopo il quale è possibile eseguire nuovamente il comando src_postgres.

Answer 1

si può fare:

RPostgreSQL::dbDisconnect(src_temp$con) 

per forzare una disconnessione.

Questo è quello che si chiama il garbage collection da questa funzione in dplyr (attraverso il file dbi-s3.r di origine):

# Creates an environment that disconnects the database when it's 
# garbage collected 
db_disconnector <- function(con, name, quiet = FALSE) { 
    reg.finalizer(environment(), function(...) { 
    if (!quiet) { 
     message("Auto-disconnecting ", name, " connection ", 
     "(", paste(con@Id, collapse = ", "), ")") 
    } 
    dbDisconnect(con) 
    }) 
    environment() 
}