data(ai) #Load test data set
ppi <- Path2PPI("Autophagy induction", "Podospora anserina", "5145")
ppi <- addReference(ppi, "Homo sapiens", "9606", human.ai.proteins,
human.ai.irefindex, pa2human.ai.homologs)
ppi <- addReference(ppi, "Saccharomyces cerevisiae (S288c)", "559292",
yeast.ai.proteins, yeast.ai.irefindex,
pa2yeast.ai.homologs)
ppi <- predictPPI(ppi,h.range=c(1e-60,1e-20))
interaction <- showInteraction(ppi,interaction=c("B2AT71","B2AE79"),
mode="detailed")
interaction
Run the code above in your browser using DataLab