#' Locate
#'
#' @param xpath xpath
#'
#' @return text
#' @export
#'
RS.locate <- function(xpath){
read_html(remDr$getPageSource()[[1]][1]) %>%
html_nodes(xpath=xpath)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.