r - 使用 igraph 进行两列二分布局

Question

我正在尝试绘制一个二分图，但有两列；函数手册指出 layout_as_bipartite() “最小化二分图的简单两行(或列)布局中的边交叉。”尝试使用示例，我只能得到两个行图:

library(igraph)
library(dplyr)
# Random bipartite graph
inc <- matrix(sample(0:1, 50, replace = TRUE, prob=c(2,1)), 10, 5)
g <- graph_from_incidence_matrix(inc)
plot(g, layout = layout_as_bipartite,
     vertex.color=c("green","cyan")[V(g)$type+1])

# Two columns
g %>%
  add_layout_(as_bipartite()) %>%
  plot()

Answer 1

看起来 layout_as_bipartite 只处理行，而不处理列，但很容易修改生成的布局。布局只是节点的 X-Y 坐标，因此要从行更改为列，只需切换 X 和 Y。

LO = layout_as_bipartite(g)
LO = LO[,c(2,1)]
plot(g, layout = LO, vertex.color=c("green","cyan")[V(g)$type+1])