# first, delete existing windows to save memory:
deleteAllWindows(CytoscapeConnection())
cw <- CytoscapeWindow ('deleteSelectedNodes.test', graph=makeSimpleGraph())
displayGraph (cw)
redraw (cw)
layoutNetwork(cw, 'force-directed')
print (nodes (cw@graph))
# [1] "A" "B" "C"
selectNodes (cw, "B")
deleteSelectedNodes (cw)
Run the code above in your browser using DataLab