tests/testthat/test_boundary_data.R

test_that("data", {
  expect_equal(nrow(nhdplusTools::vpu_boundaries), 23)
  expect_equal(nrow(nhdplusTools::rpu_boundaries), 70)


  expect_true(inherits(nhdplusTools::vpu_boundaries, 'sf'))
  expect_true(inherits(nhdplusTools::rpu_boundaries, 'sf'))
})

Try the nhdplusTools package in your browser

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

nhdplusTools documentation built on Oct. 2, 2023, 5:06 p.m.