tests/testthat/test-call_sources.R

# Test call_ family of functions
test_that("call_sources() returns the correct output format", {
  so <- call_sources("emperors")
  expect_type(so, "list")
  # expect_length(so, 4)
  # expect_named(so, c('Dataset', 'Source', 'URL', 'Mapping'))
  expect_s3_class(so, "tbl")
})

Try the manydata package in your browser

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

manydata documentation built on April 4, 2025, 5:25 a.m.