Nothing
test_that("i14y_search_catalog() returns a data.frame", {
if (!curl::has_internet()) {
skip("No internet connection")
}
df <- i14y_search_catalog(query = "noga", page = 1, pageSize = 1)
expect_s3_class(df, "data.frame")
expect_true(nrow(df) >= 1)
})
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.