R+igraphのお勉強 その2

前回の続き．

有向グラフを無向グラフに変換してみる．

有向グラフの確認．

> is.directed(g)
[1] TRUE

無向グラフに変換する．

> g2<-as.undirected(g)

変換結果を確認する．

> g2
Vertices: 10
Edges: 9
Directed: FALSE
Edges:
         
[0] 0 -- 1
[1] 0 -- 2
[2] 1 -- 3
[3] 1 -- 4
[4] 2 -- 5
[5] 2 -- 6
[6] 3 -- 7
[7] 3 -- 8
[8] 4 -- 9
> is.directed(g2)
[1] FALSE

グラフを描画する．

> png("plot2.png",width=400, height=400,pointsize=12) 

> plot(g2,layout=lay)

> dev.off()
null device
          1

作業経過をファイル保存する．

 > save(g,g2,lay,file="test.dat")