R reciprocal edges in igraph in R

Question

I am working with graphs in R. I am currently using igraph and I would like to be able to plot bidirectional edges "reciprocal edges" of a graph. So far I've seen it is possible to plot "bidirectional" graphs but not reciprocal edges, for example: E(1,3) and E(3,1) could potentially be represented as a bidirectional edge <-->, but instead I would like to plot two parallel edges one pointing to the opposite direction of the other || . There exist in Rgraphviz an option when plotting "plot(rEG, recipEdges = "distinct")" that makes this, but I like more how plots look like on igraph. Thanks in advance.

Sacha Epskamp Sacha Epskamp · Accepted Answer · 2011-04-19T16:46:37

In igraph, you can use the edge attribute curved to curve the edges you want.

For example, here is a graph based small adjacency matrix:

library("igraph")
adj <- matrix(c(
    0,1,1,
    1,0,1,
    0,0,0),3,3,byrow=TRUE)

library("igraph")
G <- graph.adjacency(adj)

The edge between node 0 and 1 is bidirected (Actually, it isn't, it are two edges and they just look like a bidirected edge because they are straight).:

plot(G)

To change this, we can use the edgelist:

E <- t(apply(get.edgelist(G),1,sort))

E(G)$curved <- 0
E(G)[duplicated(E) | duplicated(E,fromLast =TRUE)]$curved <- 0.2

plot(G)

Another option is my package, where this is the default behavior:

library("qgraph")
qgraph(adj)

which can be suppressed with the bidirectional argument.

R reciprocal edges in igraph in R

2 Answers