Ich habe einen Beispielcode in R wie folgt:

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)

wo ich csv datei als eingabe benutzt habe die folgende daten enthält:

    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

Danach habe ich folgenden Befehl verwendet, um Gewichtswerte zu überprüfen:

E(net)$weight

Die erwartete Ausgabe sieht ungefähr so ​​aus:

> E(net)$weight
 [1]  8  1 10  1 15  1  1  5  7  1

Aber ich bekomme seltsame Werte (und jedes Mal anders):

> E(net)$weight
 [1] 2.121996e-314 2.121996e-313 1.697597e-313  1.291034e-57 1.273197e-312 5.092790e-313 2.121996e-314 2.121996e-314 6.320627e-316 2.121996e-314 1.273197e-312 2.121996e-313
[13] 8.026755e-316  9.734900e-72 1.273197e-312 8.027076e-316 6.320491e-316 8.190221e-316 5.092790e-313  1.968065e-62 6.358638e-316

Ich kann nicht finden, wo und was ich falsch mache? Bitte helfen Sie mir, das richtige erwartete Ergebnis zu erzielen und sagen Sie mir auch, warum diese seltsame Ausgabe und das jedes Mal anders ist, wenn ich sie ausführe.

Danke, Nitin