R/readurl.R

In emilykuehler/basketballstatsR: What the Package Does (One Line, Title Case)

#' @title Read URL
#'
#' @description makes sure the connection is good, if so, returns xml material, otherwise returns NA
#' @keywords HTML, XML
#' @export
#' @examples
#' readUrl()

readUrl <- function(url) {
  out <- tryCatch(
    {
      xml2::read_html(url)
    },
    error=function(e) {NA}
  )
}