tests/testthat_disabled/test-avisQueryContributor.R

context ("avisQueryContributor")

# TODO: test based on mocked .avisApiFichaUsuario and .avisApiUsuarios

test_that("avisQueryContributor returns correct format",{ 

  	# get some valid contributor id
  	cs <- avisContributorsSummary()
  	id <- cs[[1]]

  	expect_is(avisQueryContributor(id), 'data.frame')        
})
ropensci/rAvis documentation built on May 18, 2022, 5:41 p.m.