Nothing
context("Check data loading")
test_that("check rodents data", {
data(rodents)
expect_equal(length(rodents), 2)
expect_equal(names(rodents), c("document_term_table",
"document_covariate_table"))
})
test_that("check jornada data", {
data(jornada)
expect_equal(length(rodents), 2)
expect_equal(names(rodents), c("document_term_table",
"document_covariate_table"))
})
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.