tests/testthat/test-nitrc-demographics.R

In neuroconductor/nitrcbot: Download Image Files from the 'NeuroImaging Tools and Resources Collaboratory'

test_that("nitrc_demographics",{
  skip_on_cran()
  skip_on_ci()
  testthat::expect_message(nitrc_demographics('42'),'Could not find project 42 in NITRC')
  testthat::expect_is(nitrc_demographics('ixi'),'data.frame')
  testthat::expect_is(nitrc_demographics(),'data.frame')
  testthat::expect_null(nitrc_demographics('kin',jsessionID = ""))
})