Nothing
test_that("Rate class initialization works", {
# Item object creation works
testthat::expect_no_error(asRate(auth = setup_auth_object))
# Item object class and methods are set
checkmate::assert_r6(
setup_rate_limit_obj,
classes = c("Item", "Rate"),
public = c(
"rate", "instance", "print"
)
)
})
test_that("Rate print method works", {
testthat::skip_on_ci()
testthat::skip_on_cran()
testthat::expect_snapshot(setup_rate_limit_obj$print())
})
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.