tests/testthat/test_canton_json_to_dfr.R

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")
  
})
politanch/swissdd documentation built on June 12, 2025, 6:42 a.m.