Plot sites on a leaflet map
# S4 method for class 'sites'
plotLeaflet(object)leaflet map
if (FALSE) { # \dontrun{
# Note that by default the limit for queries is 25 records:
tryCatch(
{
modernSites <- get_sites(keyword = "Modern")
plotLeaflet(modernSites)
},
error = function(e) {
message("Neotoma server not responding. Try again later.")
}
)
} # }