Nothing
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")
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.