Nothing
context("almost.zero")
test_that("'almost.zero' works", {
expect_identical(almost.zero(c(0, 10^(-7), 10^(-8))),
c(TRUE, FALSE, TRUE))
})
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.