# Set test context
biodb::testContext("Generic tests")
# Instantiate Biodb
biodb <- biodb::createBiodbTestInstance(ack=TRUE)
# Load package definitions
defFile <- system.file("definitions.yml", package='biodbChebi')
biodb$loadDefinitions(defFile)
# Create connector
conn <- biodb$getFactory()$createConn('chebi')
# Run generic tests
testRefFolder <- system.file("testref", package='biodbChebi')
biodb::runGenericTests(conn, pkgName='biodbChebi',
testRefFolder=testRefFolder, opt=list(max.results=1))
# Terminate Biodb
biodb$terminate()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.