RCytoscape (version 1.22.0)

setEdgeSourceArrowColorDirect: setEdgeSourceArrowColorDirect

Description

In the specified CytoscapeWindow, set the edgeSourceArrowColor of the specified edge or edges. Low numbers, near zero, are transparent. High numbers, near 255, are maximally opaque: they are fully visible.

Usage

setEdgeSourceArrowColorDirect(obj, edge.names, new.colors)

Arguments

obj

a CytoscapeWindowClass object.

edge.names

one or more String objects, edges in standard Cytoscape form.

new.colors

one or more String object, representing a color in a '#RRGGBB' hex format.

Value

None.

See Also

setNodeEdgeSourceArrowColorDirect

Examples

  cw <- new.CytoscapeWindow ('setEdgeSourceArrowColorDirect.test', graph=makeSimpleGraph())
  displayGraph (cw)
  redraw (cw)
  layoutNetwork(cw, 'jgraph-spring')

  arrows = c ('Arrow', 'Diamond', 'Circle')
  edgeType.values <- c ('phosphorylates', 'synthetic lethal', 'undefined')
  setEdgeSourceArrowRule (cw, 'edgeType', edgeType.values, arrows)
  setEdgeTargetArrowRule (cw, 'edgeType', edgeType.values, arrows)

  colors.1 = c ("#FFFFFF", "#FFFFFF", "#FFFFFF")
  colors.2 = c ("#AA00AA", "#00AAAA", "#0000AA")

  edge.names = as.character (cy2.edge.names (cw@graph)) [1:3]

  for (i in 1:2) {
    setEdgeSourceArrowColorDirect (cw, edge.names, colors.1)
    redraw (cw)
    Sys.sleep (1)
    setEdgeSourceArrowColorDirect (cw, edge.names, colors.2)
    redraw (cw)
    Sys.sleep (1)
    } # for i