tests/testthat/test-ndr.R

test_that("ndr works", {
  unlink("workspace", recursive = TRUE)
  ndr(ndr_testdata_args(), overwrite = TRUE)
  testthat::expect_true(file.exists("workspace/p_surface_export.tif"))
  unlink("workspace", recursive = TRUE)
})
jsta/rinvest documentation built on March 17, 2023, 6:15 a.m.