Nothing
# Odd integer ==================================================================
x <- 2
expect_error(alkahest:::assert_odd(x))
x <- 3
expect_equal(alkahest:::assert_odd(x), x)
# Length =======================================================================
expect_error(alkahest:::assert_length(1:5, 3))
expect_equal(alkahest:::assert_length(1:5, 5), 1:5)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.