Nothing
test_that("test make_linter_from_regex works", {
linter <- lintr:::make_linter_from_regex("-", "style", "Silly lint.")()
expect_lint("a <- 2L", "Silly lint.", linter)
expect_lint("a = '2-3'", NULL, linter)
})
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.