tests/testthat/testrownums.R

context("DataFrame size")

test_that("Number of DataFrame rows is same as of packages.",{
  expect_equal(class(get_license_info()),class(data.frame()))
  expect_equal(nrow(get_license_info()), length(list.files(.libPaths())))
})
fmhk23/licenselist documentation built on May 16, 2019, 1:43 p.m.