r - 子集有向图

Question

我正在 igraph 中使用有向网络。下面是生成这样一个网络的一些代码:

# example graph
# install.packages(c("igraph"), dependencies = TRUE)
library(igraph)
set.seed(1)
g <- erdos.renyi.game(20, 1/20,directed=TRUE,loops=FALSE)
V(g)$name <- letters[1:20]
par(mar=rep(0,4))
plot(g)

我想提取该网络的子集，其中包括任意顶点以及指向该顶点的所有边和顶点，而不管该连接的程度或距离如何。

这是我想提取的一个photoshopped示例，在这种情况下使用顶点“E”。我想提取一个网络，其中包括所有标记为蓝色和连接边的顶点。

Answer 1

除了@42-，我认为 distance 也可以使用。

> d = distances(g, to='e', mode='out')
> V(g)[which(!is.infinite(d) & d >0)]
+ 4/20 vertices, named:
[1] a n r t

简而言之，括号内的代码返回与 e 具有非零和有限距离的顶点的索引。给别人。