outFile <- tempfile()
results <- getNeighbors(system.file("extdata",
"raf_map_kinase_cascade_reactome.owl", package="paxtoolsr"),
outFile,
c("HTTP://WWW.REACTOME.ORG/BIOPAX/48887#PROTEIN2360_1_9606",
"HTTP://WWW.REACTOME.ORG/BIOPAX/48887#PROTEIN1631_1_9606"))
Run the code above in your browser using DataLab