context("getRange")
test_that("getRange outputs correctly", {
expect_equal(getRange(c(12,2,4)), 10)
expect_error(getRange("a"), "x")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.