tests/testthat_disabled/test-avisContributorsSummary.R

context ("avisContributorsSummary")

test_that("avisContributorsSummary returns expected header",{

	response <- avisContributorsSummary()

	expectedNames <- c("UserId", "Observations","Species","Provinces","UTMs","Periods")

  	expect_equal (colnames (response), expectedNames)
})

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.