test_that("Test years prints",{
expect_equal(years("poptotal"),
"1900-2008,2012-2017")
expect_equal(years(c("poptotal", "popfemale")),
c("1900-2008,2012-2017",
"1994-2010"))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.