# NOT RUN {
total <- availableConnections()
message("You can have ", total, " connections open in this R installation")
free <- freeConnections()
message("There are ", free, " connections remaining")
# }
Run the code above in your browser using DataLab