context("get vector of breaks")
test_that("get_age_breaks() works", {
expect_identical(get_age_breaks(maxage = 50, agesplit = 5), c(-1, 4, 9, 14, 19, 24, 29, 34, 39, 44, 49, 125))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.