context("canton_json_to_dfr")
test_that("canton_json_to_dfr works for last vote", {
expect_error(canton_json_to_dfr(votedates="1999-01-01vv"))
cantvotes <- canton_json_to_dfr()
expect_is(cantvotes, "data.frame")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.