# WARNING: Method RCy3::setEdgeTargetArrowOpacityDirect() is not implemented in RCy3!
# first, delete existing windows to save memory:
deleteAllWindows(CytoscapeConnection())
cw <- CytoscapeWindow ('setEdgeTargetArrowOpacityDirect.test', graph=makeSimpleGraph())
displayGraph (cw)
layoutNetwork (cw, 'force-directed')
edges.of.interest <- as.character (cy2.edge.names (cw@graph))
# make sure the target arrows are visible
setEdgeTargetArrowShapeDirect (cw, edges.of.interest, 'Circle')
# first try passing three edges and three arrow opacity values
setEdgeTargetArrowOpacityDirect (cw, edges.of.interest, c (64, 128, 255))
# now try passing three edges and one opacity value
setEdgeTargetArrowOpacityDirect (cw, edges.of.interest, 32)
# restore the default
setEdgeTargetArrowOpacityDirect (cw, edges.of.interest, 255)
Run the code above in your browser using DataLab