.onAttach <- function(libname, pkgname) {
# If sen2r settings dir does not exist, ask for creating it
invisible(give_write_permission())
# Welcome message
packageStartupMessage(paste(
"Welcome to sen2r. To use the package from a GUI, launch",
" > sen2r()",
"Documentation: https://sen2r.ranghetti.info",
"\nIMPORTANT: since November 2023, SAFE archives can no longer",
"be downloaded from the ESA Hub, so Google Cloud is the new default server.",
"To be able to search and download inputs: ",
"- install Google Cloud SDK (https://cloud.google.com/sdk/docs/install);",
"- configure sen2r to use Google Cloud SDK launching the function:",
" > check_gcloud()",
# if (all(
# Sys.info()["sysname"] %in% c("Windows", "Darwin"),
# length(load_binpaths()) == 0
# )) {
# paste(
# "\nIMPORTANT: sen2r depends on some external tools;",
# "before using it, it is strongly recommended to run function",
# " > check_sen2r_deps()",
# "to check them and install the missing ones.",
# sep = "\n"
# )
# },
sep = "\n"
))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.