tests/testthat/test-gni_details.R

context("gni_details")

test_that("gni_details returns the correct value", {
  skip_on_cran()
  vcr::use_cassette("gni_details", {
    x <- gni_details(id = 17802847)
  })

  expect_is(x, "data.frame")
  expect_match(as.character(x[,3]), "none")
})

Try the taxize package in your browser

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

taxize documentation built on Sept. 11, 2024, 6:13 p.m.