16

igraph グラフをエッジ特性 (ラベルなど) でサブセット化しようとしています。少し変更を加えた別の投稿から恥知らずに盗んだ再現可能な例では、親友の絆 (BF) を家族の絆 (FAM) から分離できるようにしたいと考えています。

edges <- matrix(c(103, 86, 24, 103, 103, 2, 92, 103, 87, 103, 103, 101, 103, 44), ncol=2, byrow=T)
g <- graph(as.vector(t(edges)))
E(g)[c(2:4,7)]$label<-"FAM"
E(g)[c(1,5,6)]$label<-"BF"

これまでにできる最善の方法は、1 種類のタイを持つエッジを表示することです。

E(g)[E(g)$label=="BF"]
V(g)[E(g)$label=="BF"]
4

2 に答える 2

25

どうですか:

gfam <- subgraph.edges(graph=g, eids=which(E(g)$label=="FAM"), delete.vertices = TRUE)
gbf <- subgraph.edges(graph=g, eids=which(E(g)$label=="BF"), delete.vertices = TRUE)

igraph/ネットワーク分析チュートリアル/恥知らずなプラグインの提案: http://sna.stanford.edu/rlabs.php

于 2013-04-07T17:10:05.133 に答える