test_that("'age_distribution' returns a data.frame with 16 rows", {
t1 <- age_distribution(country = "Greece", year = 2020)
expect_rows(t1)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.