tests/testthat/test-station_ids.R

context("test-station_ids.R")

test_that("station_ids works", {
  x <- station_ids()
  expect_equal(length(x) >= 1580, TRUE)
})
cvitolo/rnrfa documentation built on Feb. 16, 2021, 2:39 p.m.