Test the connection to Cytoscape.
ping(obj)
obj
CytoscapeConnectionClass
"It works!"
Paul Shannon
cy <- CytoscapeConnection () ping (cy) # "It works!"