Nothing
`plotObservedEffects.gp` <-
function(x, params = 1:x$numDim, ...) {
createWindow(length(params))
params = toParamIndexes(params, x$params)
for (i in params) {
plot(x$X[,i], x$Z, xlab = x$params[i])
}
}
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.