Check if an argument is a URL
assert_url(x)Object to check
If the check is successful, x will be returned invisibly.
url <- "https://github.com/KoderKow/pathr"
assert_url(url)
# The following throws an error
url <- "ww.exampl.co/this/will/fail"
try(assert_url(url))