# You can learn more about package authoring with RStudio at:
#
# http://r-pkgs.had.co.nz/
#
# Some useful keyboard shortcuts for package authoring:
#
# Build and Reload Package: 'Ctrl + Shift + B'
# Check Package: 'Ctrl + Shift + E'
# Test Package: 'Ctrl + Shift + T'
GetListOfIcones <- function() {
data(listIcones, package = 'R.Maps')
print(paste0("We get icones : ",paste(names(listIcones),collapse=", "),"."))
return(listIcones)
}
# listIcones <- iconList(
#
# maison = makeIcon(
# iconUrl = "data/maison.png",
# iconWidth = 20, iconHeight = 20,
# iconAnchorX = 20, iconAnchorY = 20),
#
# airBNB = makeIcon(
# iconUrl = "data/airBNB.png",
# iconWidth = 20, iconHeight = 20,
# iconAnchorX = 20, iconAnchorY = 20),
#
# metro = makeIcon(
# iconUrl = "data/metro.png",
# iconWidth = 20, iconHeight = 20,
# iconAnchorX = 20, iconAnchorY = 20)
#
# )
# devtools::use_data(listIcones)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.