data(example) # Load example
chebi = example$chebi
rhea_generic = example$rhea_generic$equationWithChebi
rhea_massbal = example$rhea_massbal
rhea = c(rhea_generic, rhea_massbal)
# Check generic reaction
is.generic.rhea(rhea, chebi, id_col='chebi', parent_col='parent',
formula_col='formula', direction_type=c(' <=> ', ' <\\?> ', ' => '))
Run the code above in your browser using DataLab