R/utils.R

Defines functions closeSockets

closeSockets <- function() {
    allCon <- showConnections()
    socketCon <- as.integer(rownames(allCon)[allCon[, "class"] == "sockconn"])
    sapply(socketCon, function(ii) close.connection(getConnection(ii)) )
}
jhsiao999/flowMap documentation built on May 19, 2019, 9:28 a.m.