我在R中有一个示例代码如下:
library(igraph)
rm(list=ls())
dat=read.csv(file.choose(),header=TRUE,row.names=1,check.names=T) # read .csv file
m=as.matrix(dat)
net=graph.adjacency(adjmatrix=m,mode="undirected",weighted=TRUE,diag=FALSE)
Run Code Online (Sandbox Code Playgroud)
我使用csv文件作为输入,其中包含以下数据:
23732 23778 23824 23871 58009 58098 58256
23732 0 8 0 1 0 10 0
23778 8 0 1 15 0 1 0
23824 0 1 0 0 0 0 0
23871 1 15 0 0 1 5 0
58009 0 0 0 1 0 7 0
58098 10 1 0 5 7 0 1
58256 0 0 0 0 0 1 0
Run Code Online (Sandbox Code Playgroud)
在此之后,我使用以下命令检查重量值:
E(net)$weight
Run Code Online (Sandbox Code Playgroud)
预期输出有点像这样:
> E(net)$weight
[1] …Run Code Online (Sandbox Code Playgroud)