.onAttach <- function(libname, pkgname) {
options(rgee.print.option = "simply")
}
.onLoad <- function(libname, pkgname) {
# # if EARTHENGINE_PYTHON is defined then forward it to RETICULATE_PYTHON
# earthengine_python <- Sys.getenv("EARTHENGINE_PYTHON", unset = NA)
# if (!is.na(earthengine_python))
# Sys.setenv(RETICULATE_PYTHON = earthengine_python)
# delay load earthengine-api
Map <<- R6Map$new(save_maps = FALSE)
ee <<- reticulate::import("ee", delay_load = TRUE)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.