Nothing
context("responsive args")
test_that("rename 'default' and 'xs'", {
expect_named(responsive_rename(c(default = NA)), "")
expect_named(responsive_rename(c(default = NA, xl = 1)), c("", "xl"))
expect_named(responsive_rename(c(xs = NA)), "")
})
test_that("errors on invalid breakpoints", {
expect_error(responsive(c(zz = 1, xxl = 2)))
})
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.