context("init_param")
test_that("use", {
alpha_param <- create_alpha_param()
testthat::expect_false(is_init_param(alpha_param))
alpha_param <- init_param(alpha_param, id = 1)
testthat::expect_true(is_init_param(alpha_param))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.