Nothing
context("stackMeta")
mtlFile <- system.file("external/landsat/LT52240631988227CUB02_MTL.txt", package="RStoolbox")
test_that("stackMeta with exampleData", {
expect_s4_class(st <- stackMeta(mtlFile), "SpatRaster")
expect_s4_class(stackMeta(readMeta(mtlFile)), "SpatRaster")
expect_true(all(grepl("B[1-7]_dn", names(st))))
})
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.