tests/testthat/test-info.R

test_that("print_info has right names", {
  lapply(
    textdata:::print_info,
    function(x) expect_true(all(names(x) == c("name", "url", "license", "size", "type", "download_mech", "description", "citation")))
  )
})

Try the textdata package in your browser

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

textdata documentation built on Sept. 2, 2022, 9:05 a.m.