tests/testthat_disabled/test-avisHasSpecies.R

# tests for avisHasSpecies in rAvis

context("avisHasSpecies")

test_that("Pica pica is in the database, Pica pic is not",{ 
	
    nameraw<- "Pica pica"
    expect_true(avisHasSpecies (nameraw))

    nameraw<- "Pica pic"
    expect_false(avisHasSpecies (nameraw))
})

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.