Nothing
library(optimx)
library(svUnit)
optimx.test1 <- system.file("unitTests", "runit.1.R", package = "optimx")
cat("Running:", optimx.test1, "\n")
source(optimx.test1)
clearLog()
test.1()
Log()
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.