# NOT RUN {
"https://mockbin.com/request" %>% ping()
ping("https://mockbin.com/request")
"https://mockbin.com/request" %>% ping(config=verbose())
ping("https://mockbin.com/request", config=verbose())
"https://mockbin.com/request" %>% ping(config=c(verbose(), accept_json()))
"https://mockbin.com/request" %>% ping()
"https://mockbin.com/request" %>% ping(verb=HEAD)
"https://mockbin.com/request" %>% ping(verb=PUT)
"https://google.com" %>% ping()
# pass just a port number, tries to resolve, fails if not found
# "9200" %>% ping()
# 9200 %>% ping()
# 9200 %>% ping(verb=POST)
# 9200 %>% ping(verb=HEAD)
# ping(9200)
# ping("9200")
# }
Run the code above in your browser using DataLab