tests/testthat/test-getSystemCode.R

library(BridgeDbR)
context("simple")

test_that("it knows about ChEBI", {
    dataSource <- getSystemCode("ChEBI")
    expect_equal(dataSource, "Ce")
})
egonw/BridgeDbR documentation built on Nov. 8, 2024, 4:21 a.m.