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)
})

Try the rYoutheria package in your browser

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

rYoutheria documentation built on May 2, 2019, 8:32 a.m.