test_that("useful error message", {
input <- rep(c(x_valid, x_invalid), 12)
expect_snapshot(error = TRUE, {
json2(input)
})
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.