Nothing
RStudioConnectionOpened <- function(endpoint, token) {
observer <- getOption("connectionObserver")
if (!is.null(observer)) {
observer$connectionOpened(type = "DataRobot",
displayName = "DataRobot",
icon = file.path(system.file(file.path("icons"),
package = "datarobot"), "datarobot.png"),
host = endpoint,
listObjectTypes = function() { list(table = NULL) },
connectCode = "datarobot::ConnectToDataRobot",
disconnect = function() { NULL },
listObjects = datarobot::ListProjects,
listColumns = datarobot::ListProjects,
previewObject = datarobot::ListProjects,
connectionObject = NULL)
}
}
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.