tests/testthat_disabled/test-avisContributorAggregatedObservations.R

context ("avisContributorAggregatedObservations")

test_that("Returns expected header", {

	response <- avisContributorAggregatedObservations(100)

	expectedNames <- c("SpeciesId", "Observations", "Number", "UTM.10x10", "Birdwatchers")

	expect_equal (names (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 30, 2017, 6:42 a.m.