test_that("meta data complete", {
has_data <- sapply(rvestScraper, function(scrp) all(c("url", "jobNameXpath", "domain", "href") %in% names(scrp)))
expect_equal(all(has_data), TRUE)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.