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 6, 2019, 7:55 a.m.