Nothing
test_that("R code can be generated", {
data <- endosulfan
distributions <- list("lnorm", "llogis")
code <- code_r_ssd(data, distributions)
expect_type(code, "character")
expect_true(nchar(code) > 1)
})
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.