#
# This test file has been generated by kwb.test::create_test_files()
# launched by user hsonne on 2022-09-16 16:40:56.
# Your are strongly encouraged to modify the dummy functions
# so that real cases are tested. You should then delete this comment.
#
test_that("raster_stats() works", {
f <- kwb.dwd:::raster_stats
expect_error(
f()
# argument "r" is missing, with no default
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.