tests/testthat/test-empty-updates.R

test_that("empty updates response yields an empty typed result", {
  csv <- "indicator_id;snapshot_id;update_date;data_from;data_to"
  updates <- aradR:::arad_parse_updates_response(charToRaw(csv), encoding = "UTF-8")

  expect_equal(nrow(updates), 0L)
  expect_s3_class(updates$data_from, "Date")
  expect_s3_class(updates$update_date, "POSIXct")
})

Try the aradR package in your browser

Any scripts or data that you put into this service are public.

aradR documentation built on Oct. 15, 2026, 5:08 p.m.