Nothing
# Testing 'Statistic' class.
test_that("'Statistic' base class throws errors for abstract methods", {
# Create `Statistic` base class.
statistic <- Statistic$new()
# Expect error because the methods are abstract.
expect_error(statistic$compute(NULL), .__ERRORS__$not_implemented)
expect_error(statistic$apply(NULL), .__ERRORS__$not_implemented)
})
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.