Nothing
test_that("bounds() and domain() handle their arguments specially", {
B <- bounds(x=c(1.5:10.5))
expect_equal(names(B), "x")
expect_equal(B$x, c(1.5, 10.5))
})
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.