Nothing
context("text")
test_that("text", {
expect_equal(format(make_text("a")), "a")
expect_equal(format(make_text("a", "b")), c("a", "b"))
expect_equal(format(make_text(letters)), letters)
})
test_that("error checking", {
expect_error(make_text(), "At least")
})
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.