.onLoad <- function(lib, pkg){
if(!has_7z()$yes){
warning("The 7-zip program is needed to unpack NHD downloads (http://www.7-zip.org/).")
}
}
.onLoad <- function(libname, pkgname) {
query_wbd <<- memoise::memoise(query_wbd)
query_gis <<- memoise::memoise(query_gis)
query_gis_ <<- memoise::memoise(query_gis_)
query_lake_poly <<- memoise::memoise(query_lake_poly)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.