Nothing
#' @importFrom testthat test_that expect_equal
#'
context("bRacatus")
input_data <- "Hemitriccus mirandae"
test_that("Expected data structure",{
expect_equal(class(input_data),"character")
})
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.