# NOT RUN {
## Load the SourceSetObj obtained from the source set analysis of ALL dataset
# see vignette for more details
print(load(file=system.file("extdata","ALLsourceresult.RData",package = "SourceSet")))
class(results.all)
## NB: Remember to launch cytoscape before running the following commands
# Create two collections of pathways to visualize the results
graph.signaling<-names(results.all)[grep("signaling",names(results.all))]
graph.other<-setdiff(names(results.all),graph.signaling)
## Signaling collection
# }
# NOT RUN {
cytoID.signaling.union<-sourceUnionCytoscape(results.all,
name.graphs =graph.signaling ,collection.name ="SignalingPathway",
network.name ="SignalingUnion")
# }
# NOT RUN {
## Other collection
# }
# NOT RUN {
cytoID.other.union<-sourceUnionCytoscape(results.all ,
name.graphs =graph.other,collection.name ="OtherPathway" ,
network.name ="OtherUnion")
# }
Run the code above in your browser using DataLab