test_that("size works", {
expect_equal(size(vector(length = 3L)), 3L)
expect_equal(size(matrix()), 1L)
expect_equal(size(list(a = matrix())), 1L)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.