inst/tests/test_data.R

library(testthat)
context("Testing the data of the pkgutils package")


################################################################################

## ?
test_that("the data sets are there", {
  expect_equal(nrow(data(package = "pkgutils")$results), 1L)
})

Try the pkgutils package in your browser

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

pkgutils documentation built on May 2, 2019, 5:49 p.m.