Nothing
library(randomForest)
# Continuous outcome
fit <- randomForest(Ozone ~ ., data=airquality, na.action=na.omit)
visreg(fit, "Temp")
# Binary outcome
mtcars$am <- factor(mtcars$am)
fit <- randomForest(am ~ ., mtcars)
visreg(fit, "wt")
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.