misc/tripadvisor_get_id.R

In PeerChristensen/reviewR: Scrape Online Reviews from Major Review Sites

#' @param html html
#'
#' @keywords internal
#'
#' @import rvest
#' @import dplyr


tripadvisor_get_id <- function(html) {
  # currently not used
  id <- html                   %>%
    rvest::html_elements("div")          %>%
    rvest::html_attr("data-reviewid") %>%
    na.omit()
}