Nothing
# test_that("boot works", {
data(fivenets, package="ergmito")
ans0 <- ergmito(fivenets ~ edges + nodematch("female"))
ans1 <- suppressWarnings(ergmito_boot(ans0, R = 200L, ncpus = 1L))
ans2 <- suppressWarnings(ergmito_boot(ans0, R = 200L, ncpus = 2L))
expect_output(print(ans1), "200 replicates")
expect_output(print(ans2), "200 replicates")
#
# })
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.