tests/testthat/test_search.R

In tidyhydat: Extract and Tidy Canadian 'Hydrometric' Data

test_that("search_stn_number returns a dataframe", {
  skip_if_net_down()
  expect_s3_class(search_stn_number("08HF", hydat_path = hy_test_db()), "data.frame")
})


test_that("search_stn_name returns a dataframe", {
  skip_if_net_down()
  expect_s3_class(search_stn_name("Saskatchewan", hydat_path = hy_test_db()), "data.frame")
})