test_that("space() works", {
f <- kwb.utils:::space
expect_identical(f(), " ")
expect_identical(f(5, 1), " ")
expect_identical(f(2, 2), " ")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.