2つの頂点間に複数の辺がある場合を多重辺 multiple edgeと呼びます。また、ある頂点からその頂点自身に張られる辺をループ loopと呼びます。そして、multiple edgeやloopを含むグラフのことをmultiple graphと呼びます。

今回は、Rとigraphを用いてmultiple graphを作成します。nodeは2つです。

####以下スクリプト####

library(igraph)

#edge listを作成

g1 <- matrix(c(

"1","1",

"1", "2",

"1", "2",

"2", "1"

),

ncol=2, byrow=TRUE)

g <- graph.edgelist(g1, directed=TRUE)

#vertexの情報を表示

> V(g)

Vertex sequence:

[1] "1" "2"

#edgeの情報を表示

> E(g)

Edge sequence:

          

[1] 1 -> 1

[2] 1 -> 2

[3] 1 -> 2

[4] 2 -> 1

png("multiple.png")

plot(g, vertex.label=V(g)$name, main="multiple graph")

dev.off()

【参考文献】

金明哲『Rで学ぶデータサイエンス 8 ネットワーク分析』2009 共立出版 序文、11 - 12pp