tests/testthat/testgetCountries.R

context("Test getCountries")

test_that("Testing functionality", {
  skip_on_cran()
  expect_is(test <- getCountries(), 'data.frame')
  expect_equal(ncol(test),2)
})
biologicalrecordscentre/rYoutheria documentation built on May 12, 2019, 9:24 p.m.