Làm cách nào để tìm các cạnh của một đỉnh bằng igraph và R?

Question

Nói rằng tôi có ví dụ biểu đồ này, tôi muốn tìm các cạnh nối với đỉnh 'a'

d <- data.frame(p1=c('a', 'a', 'a', 'b', 'b', 'b', 'c', 'c', 'd'), 
       p2=c('b', 'c', 'd', 'c', 'd', 'e', 'd', 'e', 'e')) 

library(igraph) 
g <- graph.data.frame(d, directed=FALSE) 
print(g, e=TRUE, v=TRUE) 

tôi có thể dễ dàng tìm thấy một đỉnh:

V(g)[V(g)$name == 'a' ] 

Nhưng tôi cần phải tham khảo tất cả các cạnh kết nối với đỉnh 'a'.

Answer 1

Xem tài liệu trên igraph iterators; đặc biệt là các hàm from() và to().

Trong ví dụ của bạn, "a" là V (g) [0], vì vậy để tìm tất cả các cạnh kết nối với "a":

E(g) [ from(0) ] 

Kết quả:

[0] b -- a 
[1] c -- a 
[2] d -- a 

Answer 2

Nếu bạn làm không biết chỉ số của đỉnh, bạn có thể tìm thấy nó bằng cách sử dụng match() trước khi sử dụng hàm from().

idx <- match("a", V(g)$name) 
E(g) [ from(idx) ] 

Answer 3

Tìm thấy một phiên bản đơn giản kết hợp hai nỗ lực ở trên cũng có thể hữu ích.

E(g)[from(V(g)["name"])] 

Answer 4

tôi sử dụng chức năng này để nhận số cạnh cho tất cả các nút:

sapply(V(g)$name, function(x) length(E(g)[from(V(g)[x])]))