#' @title Read Document
#'
#' @description makes sure the connection is good, if so, gets xml material
#' @keywords HTML, XML
#' @export
#' @examples
#' readDocument(url)
readDocument <- function(url) {
out <- tryCatch(
{
httr::GET(url)
},
error=function(e) {NA}
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.