tests/testthat/test-get_downloads_stats.R

In adigherman/neurocStats: Package that Retrieves Neuroconductor Stats

test_that("get_download_stats works", {

  testthat::expect_is(get_download_stats(), "data.frame")
  testthat::expect_is(get_download_stats('fslr'), "integer")
  testthat::expect_is(get_download_stats('fslr', verbose=TRUE), "data.frame")
  testthat::expect_is(get_download_stats(verbose = TRUE), "data.frame")
})