## Not run: if (require(graphite)) {
# graph <- pathwayGraph(convertIdentifiers(kegg$'Chronic myeloid leukemia', "entrez"))
# }
# path <- c(3,17,5,9,13.04,2.60,0.209,0.321,"6,7,8,9,10","3,5,6,7,8,9,10,14,17","1029;4193;7157","1019;1021;1026;1029;595")
# plotInCytoscape(graph,path)## End(Not run)
Run the code above in your browser using DataLab