tests/testthat/test_searchTaxonID.R

context("test searching taxonomy ID function")

test_that("return ID for a taxon", {
    taxon <- "homo sapiens"
    a <- search_taxonID_online(taxon)
    expect_that(a, is_a("data.frame"))
})
trvinh/test documentation built on May 9, 2019, 2:26 a.m.