Nothing
test_that("the arguments are of the right class", {
# Load the R objects to be used in tests
x <- watersheds
y <- DEM
dummy <- watersheds_df
#Test errors
expect_error(check_arguments(dummy, y), "X has to be a spatial object", fixed=TRUE)
expect_error(check_arguments(x, dummy), "y has to be a raster object", fixed=TRUE)
})
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.