new kingdom

This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2018-11-09 13:11:54 +01:00
1 parent 9be5e0318b
commit 6b0f4ffbd4
17 files changed
+193 -82

No files matched your search

+1
View File
@@ -1,6 +1,7 @@
context("mo_property.R")
test_that("mo_property works", {
expect_equal(mo_kingdom("E. coli"), "Bacteria")
expect_equal(mo_subkingdom("E. coli"), "Negibacteria")
expect_equal(mo_phylum("E. coli"), "Proteobacteria")
expect_equal(mo_class("E. coli"), "Gammaproteobacteria")