……更新于2016.3.20号,附上所有代码……
最近刚用R的igraph包和networkD3完成了一个项目的可视化内容(前者是静态的后者是动态的),感觉还是比较好看的哈哈(温馨提示,调亮手机) 。
:)
/>
/>
/>
/>
———————————————分割线——————————————
那现在我们来理一下思路,要做出这个效果其实真的一点都不难,现在再翻看刚开始学习时候写的代码……真的是……Naive哈哈。没有一个循环一个function就能直接出图的,不信你看——
```{r}
setwd('d:/Rproject')
set.seed(200)
App.use<-read.table("app_data.txt",header
= FALSE,sep= ",",
colClasses
=c("character","character"))
g1<-na.omit(App.use)
```
#
# 说明
设定工作目录;
设定种子节点,同一种布局画出来的图就是可以重复,不然即使同一种布局,展现的时候 由于位置的随机也会呈现出不一样的结果;
去除NA值,清除了若干条包含有缺失值的信息。
#
```{r}
library(igraph)
g2 =
graph.data.frame(d =g1, directed = F);
V(g2)
E(g2)
x<-par(bg="white")
graph.density(g2)
V(g2)$bte =
betweenness(g2, directed = F)
par(mar = c(0, 2,
0, 0))
plot(V(g2)$bte)
```
#
# 说明<