Nothing
library(FedData)
context("Utility tests")
test_that("substr_right returns correct strings", {
expect_equal(substr_right("This shit is bananas", 7), "bananas")
expect_equal(substr_right("seize the day", 7), "the day")
expect_equal(substr_right("reunion", 5), "union")
})
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.