Nothing
app <- ShinyDriver$new("../openfair_example.Rmd", seed = 95592)
app$snapshotInit("openfair_example")
app$setInputs(tefml = character(0))
app$setInputs(tefml = 30)
app$setInputs(iterations = 100)
app$setInputs(runmodel = "click")
app$snapshot()
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.