Nothing
#-------------------------
# Load the python-modules
#-------------------------
RGF_mod <- NULL; RGF_utils <- NULL; SCP <- NULL;
.onLoad <- function(libname, pkgname) {
try({
if (reticulate::py_available(initialize = TRUE)) {
try({
RGF_mod <<- reticulate::import("rgf.sklearn", delay_load = TRUE)
}, silent = TRUE)
try({
RGF_utils <<- reticulate::import("rgf.utils", delay_load = TRUE)
}, silent = TRUE)
try({
SCP <<- reticulate::import("scipy", delay_load = TRUE, convert = FALSE)
}, silent = TRUE)
}
}, silent=TRUE)
}
.onAttach <- function(libname, pkgname) {
packageStartupMessage("If the 'RGF' package gives the following error: 'attempt to apply non-function' then make sure to open a new R session and run 'reticulate::py_config()' before loading the package!")
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.