在 R 中返回 get.shortest.paths() 的单个顶点

Question

我使用 igraph 包在 R 中创建了一个随机 (Erdos-Renyi) 图，其中 p = 0.2 和 10 个节点，如下所示：

library(igraph)
graph <- erdos.renyi.game(10, 0.2, type = c("gnp", "gnm"), directed = FALSE,
    loops = FALSE)

我这样找到图的中心节点和叶节点：

centralNode <- which(degree(graph) %in% c(max(degree(graph))))
leafNodes <- which(degree(graph) %in% c(1))

我找到从中心节点到第一个叶节点的最短路径如下：

sp <- get.shortest.paths(graph, centralNode, leafNodes[1])

并且可以得到这样的东西（如果 1 是 centralNode 而 4 是 leafNodes[1]：

[[1]]
[1] 1  2  9  4

我希望能够访问从centralNode 到leafNodes[1] 的最短路径中的每个顶点。

我尝试这样做，但不断收到这些错误：

sp$2
    Error: unexpected numeric constant in "sp$2"
sp$[[1]][2]
    Error: unexpected '[[' in "sp$[["
sp$1[2]
    Error: unexpected numeric constant in "sp$1"
sp$[1][2]
    Error: unexpected '[' in "sp$["

我不确定如何单独返回每个顶点，或者只选择其中一个。我希望这是有道理的。

任何帮助将不胜感激。谢谢

Answer 1

sp 只是一个标准列表。所以 sp[[1]] 等将只获得一个向量。

但是，对图形对象进行子集化可能更有意义。像这样的：

V(graph)[sp[[1]]]