Hi
I'm trying to calculate the eigenvector correspondent to largest eigenvalue of graph.
The result obtained by "eigen" and "evcent" function were completely different although their eigenvalue were equal.
I wanna know how it it is explained
and which one is more reliable?
In the following, you can see an example
Best Regards
B.S
sw<-watts.strogatz.game(1,20,2,0.01)
m<-eigen(get.adjacency(sw))
e=evcent(sw)
m$value[1]
[1] 4
e$value
[1] 4
m$vector[1,]
[1]
-0.223606798 0.009051041 -0.316098210 0.316015499 0.011584659
0.048641352 -0.312464428 0.223606798 0.017765024 0.315728370
[11]
0.024016675 0.000000000 -0.156667569 0.418184734 -0.211845338
0.234779796 0.139724510 0.283684792 0.004032193 0.316202058
e$vector
[1] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1