# Download Insulin Signaling Pathway
pathways <- c('04915', '04917', '04930', '05031')
paths <- downloadPathways(org='hsa', pathways=pathways)
# Create pathway graph
graphs <- createPathwayGraphs(org='hsa', pathways=paths)
Run the code above in your browser using DataLab