Nothing
lng <- read.csv("inst/extdata/lng.csv",
stringsAsFactors = FALSE, strip.white = TRUE)
lng <- with(lng, data.frame(lng, t(sapply(lng$Location, RgoogleMaps::getGeoCode))))
save(lng, file = "data/lng.rda")
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.