Nothing
# Test whether input is a character
test_that("A character vector", {
wt <- LETTERS[1:7]
plan_week(wt)
expect_vector(wt, ptype = character())
})
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.