tests/testthat/test_700_reaction.R

In pkrog/biodbKegg: biodbKegg, a library for connecting to the KEGG Database

# Set context
biodb::testContext("Test Kegg Reaction connector.")

# Instantiate Biodb
biodb <- biodb::createBiodbTestInstance(ack=TRUE)

# Load package definitions
file <- system.file("definitions.yml", package='biodbKegg')
biodb$loadDefinitions(file)

# Create connector
conn <- biodb$getFactory()$createConn('kegg.reaction')

# Run tests
testRefFolder <- system.file("testref", package='biodbKegg')
biodb::runGenericTests(conn, pkgName='biodbKegg', testRefFolder=testRefFolder)

# Terminate Biodb
biodb$terminate()