#' Default storage location
#'
#' Default location can be set with the env var GBIF_HOME,
#' otherwise will use the default provided by [tools::R_user_dir()]
#'
#' @return path to the gbif home directory directory
#' @export
#' @examples
#' gbif_dir()
gbif_dir <- function(){
Sys.getenv("GBIF_HOME",
tools::R_user_dir("gbif"))
}
gbif_parquet_dir <- function(version = gbif_version(),
dir = gbif_dir()
){
file.path(dir,
"occurrence",
version,
"occurrence.parquet")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.