context("is_gamma_distr")
test_that("use", {
testthat::expect_true(
is_gamma_distr(
beautier::create_gamma_distr()
)
)
testthat::expect_false(is_gamma_distr("nonsense"))
testthat::expect_false(is_gamma_distr(42))
testthat::expect_false(is_gamma_distr(NA))
testthat::expect_false(is_gamma_distr(NULL))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.