tests/testthat/test-gna_data_sources.R

context("gna_data_sources")

test_that("gna_data_sources returns a table", {
  skip_on_cran()
  vcr::use_cassette("gna_data_sources", {
    tmp <- gna_data_sources()
  })
  expect_is(tmp, "data.frame")
  expect_equal(NCOL(tmp), 13)
})

Try the taxize package in your browser

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

taxize documentation built on April 4, 2025, 2:12 a.m.