P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2025-09-04 13:29:46 +02:00
Code Releases Activity

CI tests

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends
2019-05-13 12:21:57 +02:00
parent 38a4421450
commit 0dc0715dc6
21 changed files with 137 additions and 68 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
tests/testthat/test-mo_property.R
View File

@@ -31,6 +31,7 @@ test_that("mo_property works", {
expect_equal(mo_species("E. coli"), "coli")
expect_equal(mo_subspecies("E. coli"), "")
expect_equal(mo_fullname("E. coli"), "Escherichia coli")
expect_equal(mo_name("E. coli"), "Escherichia coli")
expect_equal(mo_type("E. coli", language = "en"), "Bacteria")
expect_equal(mo_gramstain("E. coli", language = "en"), "Gram negative")
expect_equal(class(mo_taxonomy("E. coli")), "list")
@@ -47,6 +48,8 @@ test_that("mo_property works", {
expect_equal(mo_shortname("S. agalac"), "S. agalactiae")
expect_equal(mo_shortname("S. agalac", Lancefield = TRUE), "GBS")
expect_true(mo_url("Escherichia coli") %like% "www.catalogueoflife.org")
# test integrity
MOs <- AMR::microorganisms
expect_identical(MOs$fullname, mo_fullname(MOs$fullname, language = "en"))