# first, delete existing windows to save memory:
deleteAllWindows(CytoscapeConnection())
window.title <- 'demo deleteWindow'
cw <- CytoscapeWindow (window.title, graph=makeSimpleGraph())
displayGraph (cw)
redraw (cw)
layoutNetwork(cw)
deleteWindow (cw)
cw2 <- CytoscapeWindow ('demo 2')
cy = CytoscapeConnection ()
deleteWindow (cy, 'demo 2')
Run the code above in your browser using DataLab