tests/testthat/test-search-tools.R

test_that("search_tools", {
  skip_on_cran()
  testthat::skip_if(is.null(search_saga()))

  saga <- saga_gis()

  res <- search_tools(saga, "slope")
  testthat::expect_gt(nrow(res), 0)
})

Try the Rsagacmd package in your browser

Any scripts or data that you put into this service are public.

Rsagacmd documentation built on Oct. 16, 2023, 5:06 p.m.