## Not run: ------------------------------------
# ## test whether socket connection s is available for writing or reading
# socketSelect(list(s, s), c(TRUE, FALSE), timeout = 0)
## ---------------------------------------------
Run the code above in your browser using DataLab