组合两个图并在R igraph中添加边权重

时间:2015-01-04 04:26:46

标签: r igraph

我试图将两个图表与相同的节点组合在一起,但是新的图形边缘权重是两个原始图形的总和(但当然希望解决方案扩展到N个图形):

g1 <- graph.empty(directed=FALSE) + vertices(letters[1:2])
g1 <- g1 + edge("a", "b")
E(g1)$weight <- 1

g2 <- graph.empty(directed=FALSE) + vertices(letters[1:2])
g2 <- g2 + edge("a", "b")

E(g2)$weight <- 2

g3 <- g1 %u% g2

E(g3)$weight_1 #this is 1
E(g3)$weight_2 #this is 2

但我希望E(g3)$权重为3。

有没有一种更优雅的方式来做到这一点,而不是在边缘权重_1,_2,......之后进行求和?简化/契约的东西?

1 个答案:

答案 0 :(得分:2)

只需添加weight_1weight_2即可。 igraph目前没有办法组合多个图形的顶点/边缘属性,除非是手工。这通常不是一个大问题,因为它只是一个额外的代码行(每个属性)。好吧,如果你想删除_1_2属性,可以使用三行。所以你需要做的就是:

E(g3)$weight <- E(g3)$weight_1 + E(g3)$weight_2

可能

g3 <- remove.edge.attribute(g3, "weight_1")
g3 <- remove.edge.attribute(g3, "weight_2")

我在igraph问题跟踪器中为此创建了一个问题,但不要期望很快就能使用它: https://github.com/igraph/igraph/issues/800