Nothing
context("basic functionality")
test_that("tidying works", {
th <- tidy_html("<b><p><a href='http://google.com'>google ></a></p></b>")
expect_gte(nchar(th), 249)
expect_equivalent(grepl("HTML Tidy for HTML5 for R", th), TRUE)
})
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.