test_that("empty_hts works", {
expect_false(empty_hts(y ~ x + z))
expect_true(empty_hts(y ~ x + z + hts()))
expect_false(empty_hts(y ~ x + z + hts(thing)))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.