# first, delete existing windows to save memory:
deleteAllWindows(CytoscapeConnection())
cw <- CytoscapeWindow ('setNodeLabelDirect.test', graph=makeSimpleGraph())
displayGraph (cw)
layoutNetwork (cw, 'force-directed')
setNodeLabelDirect (cw, 'A', 'A new, very long label')
setNodeLabelDirect (cw, c('B', 'C'), 'Some node')
setNodeLabelDirect (cw, c('B', 'C'), c('node B', 'node C'))
Run the code above in your browser using DataLab