tests/testthat/test_available_votedates.R

context("available votedates")

test_that("available votedates works", {
  
  swissdates <- available_votedates()
  
  expect_is(swissdates, "Date")
  
  cantdates <- available_votedates(geolevel = "canton")
  
  expect_is(cantdates, "Date")
  
})
politanch/swissdd documentation built on June 12, 2025, 6:42 a.m.