> nflo=network(flo,directed=FALSE)> plot(nflo, displaylabels = TRUE,+ boxed.labels =+ FALSE)
下一步是igraph...我们给节点赋予适当的颜色
all_shortest_paths(iflo,)
> plot(iflo)
我们还可以可视化边,需要从输出中提取边缘
> lins=c(paste(as.character...(L)[1:4],+ "--"+ as.character(L)[2:5] sep="" ,+ paste(as.character(L) 2:5],+ "--",
> E(ifl )$color=c...0.6737162 0.7989789 0.9404647 1.0000000
可以使用层次聚类图来可视化集中度度量
hclust(dist( ase ,+ method="ward")
查看集中度度量的值...,查看排名
> for(i in 1:4) rbase[,i]=rank(base[,i])
在此,特征向量测度非常接近顶点的度数。