Nothing
daemonName <- Sys.getenv("rdaemon_daemonName")
logFile <- Sys.getenv("rdaemon_logFile")
threshold <- Sys.getenv("rdaemon_threshold")
if(!nzchar(threshold))
threshold <- "INFO"
stopifnot(nzchar(daemonName))
library(rdaemon)
rdaemon:::runDaemon(
daemonName = daemonName,
interruptable = FALSE,
detach = TRUE,
logFile = logFile,
threshold = threshold
)
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.