tests/testthat/test-findParasite.R

context("findParasite")

test_that("findParasite finds the parasite", {
  skip_on_cran()
	wormy <- findParasite(genus="Brachylaima")
	expect_is(wormy, "data.frame")
	expect_gt(dim(wormy)[1], 1)
})

Try the helminthR package in your browser

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

helminthR documentation built on Dec. 9, 2022, 1:06 a.m.