library(readr)
cities <- read_csv("data-raw/cities.csv")
coords <- ggmap::geocode(cities$city, output = "more")
write_csv(coords, "data-raw/coords.csv")
# At this point the file is edited by hand to introduce errors
geocoded_cities <- read_csv("data-raw/cities.csv")
devtools::use_data(geocoded_cities)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.