# NOT RUN {
library(xml2)
doc = as_xml_document(response_directions)
# }
# NOT RUN {
doc = google_directions(
origin = c(34.81127, 31.89277),
destination = c(34.781107, 32.085003),
alternatives = TRUE
)
doc = google_directions(
origin = "Beer-Sheva",
destination = c(34.781107, 32.085003) %>% st_point %>% st_sfc(crs = 4326),
alternatives = TRUE
)
# }
Run the code above in your browser using DataLab