Nothing
skip_if_offline()
skip_if_http_error()
test_that("emprty dataframe", {
empty_msg <- "empty dataframe, check your query!"
expect_message(ukhp_get(limit = 0), empty_msg)
expect_message(ukhp_get(start_date = "2100-01-01"), empty_msg)
})
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.