cw <- new.CytoscapeWindow ('getSelectedEdges.test', graph=makeSimpleGraph())
displayGraph (cw)
layoutNetwork(cw, 'jgraph-spring')
redraw (cw)
# in Cytoscape, interactively select two edges
# doesn't work yet: selectEdges (cwe, "A (phosphorylates) B")
getSelectedEdges (cw)
Run the code above in your browser using DataLab