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')        
})

Try the rAvis package in your browser

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

rAvis documentation built on May 2, 2019, 3:28 p.m.