tests/testthat/test_get_audit_count.R

In EDIutils: An API Client for the Environmental Data Initiative Repository

context("Get audit count")

testthat::test_that("get_audit_count() works", {
  vcr::use_cassette("get_audit_count", {
    res <- get_audit_count(
      query = "category=warn&fromTime=2021-12-01&toTime=2021-12-05")
  })
  expect_type(res, "double")
})