Return a HAR entry response as an httr::response object

Return a HAR entry response as an httr::response object

as_response(har_entry)

Arguments

har_entry	a HAR object (should contain a response body to be most useful)

Examples

# NOT RUN {
library(purrr)

URL <- "http://www.svs.cl/portal/principal/605/w3-propertyvalue-18554.html"

splash_local %>%
  splash_response_body(TRUE) %>%
  splash_user_agent(ua_macos_chrome) %>%
  splash_go(URL) %>%
  splash_wait(2) %>%
  splash_har() -> har

keep(har$log$entries, is_xhr) %>%
  map(as_request) %>%
  map(httr::content, as="parsed")
# }