Nothing
# if (file.exists("test-data-for-tests.rda"))
# skip("ajaja")
#
# set.seed(76183)
# net <- matrix(rbinom(16, 1, .5), ncol=4)
# diag(net) <- 0
# library(ergm)
# suppressMessages(
# ans0 <- ergm(net ~ mutual + edges)
# )
#
# save.image("inst/test-data-for-tests.rda", version = 2)
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.