context("Instance validation")
test_that("Malformed NPS data", {
expect_error(nps(-1), "Values outside the range")
expect_error(nps(11), "Values outside the range")
expect_error(nps(0, bottom=1:6), "Values outside the range")
expect_error(nps(10, top=9), "Values outside the range")
expect_error(nps(0, bottom=0:10, top=0:10), "Top and bottom must not overlap")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.