求助：如何用R语言绘制网络图

不知道你igraph版本用的是哪一个，最新的igraph的节点是从1开始，你原始数据中有0，我把它们普遍加1了。

1. library(igraph)
   
2. gdata<-read.csv("d:/temp/neural.txt", header=TRUE,sep="")
   
3. for (j in 1:2){
   
4.   for(i in 1:length(gdata$Node1))
   
5.     gdata[i,j]<-gdata[i,j]+1
   
6. }
   
7. write.table(gdata,"d:/temp/neural2.txt")  
   
8. gdata2 <- as.matrix(gdata[1:2])
   
9. g <- graph.edgelist(gdata2, directed=T)
   
10. igraph.options(vertex.size=3, vertex.label=NA,edge.arrow.size=0.5,weight=gdata$Weight)
    
11. plot(g,layout=layout.circle)
    
12. 
    
13. plot(g,layout=layout.fruchterman.reingold)
    
14. 
    
15. plot(g,layout=layout.kamada.kawai)

复制代码

layout=layout.circle是你要的环形布局。太稠密了，都分不清线条了。
试试其他布局，layout.fruchterman.reingold，layout=layout.kamada.kawai

niu9146 发表于 2014-8-28 17:37
不知道你igraph版本用的是哪一个，最新的igraph的节点是从1开始，你原始数据中有0，我把它们普遍加1了。

...

非常感谢您！已经解决了

xuexi