IGRAPHE：获取最长的测地距离

我的问题如下： 考虑一个具有10000个节点和4800个边的非直接图。 给定这个图和这个图的一个节点（例如，节点1），我需要在igraph（R）中使用一个命令来获取这个节点1和图中最远的节点之间的距离。非常感谢您的帮助！：）

亲切问候,，

---

Ignacio.

这本质上是一个探路者/搜索

假设isConnected（a，b）在两个节点连接时返回

（我正在用Lua编写代码，翻译起来应该不难）

函数搜索（列表）
局部i=0
而我呢
i=i+1
如果未连接（i，list[#list]），则
--此表达式引用最后一个成员
搜索（列表++i）
--虽然从技术上讲不是一个合适的运算符，++将元素添加到列表的末尾
结束
结束
提交列表（列表）
结束

submit\u list

是一个获取列表并进行检查的函数。它查找提交的最长列表，其中不包含重复项。那张单子将是你问题的解决办法

哦，还有一件事；我的代码不能解释什么。如果列表包含重复的节点，则该函数应该终止，这样它就不会永远递归

> g <- erdos.renyi.game(100,1/20)
> s <- c(shortest.paths(g,2))
> s
  [1] 3 2 0 3 3 3 3 3 3 3 3 3 3 2 1 2 3 1 3 3 3 4 2 4 3 2 3 2 2 3 3 2 3 2 4 4 3
 [38] 3 3 2 2 3 3 4 2 3 3 2 2 4 3 2 3 3 2 1 2 4 2 2 2 2 1 2 4 3 2 2 2 4 3 4 3 3
 [75] 3 3 3 3 3 2 1 3 2 4 2 1 3 1 3 3 3 3 4 3 2 3 2 2 3 3
> which(s == max(s))
 [1] 22 24 35 36 44 50 58 65 70 72 84 93
> get.shortest.paths(g,2,21)
[[1]]
[1]  2 55 33 50 21

显示路径

get.shortest.paths(g,2,21)

g <- erdos.renyi.game(100,1/20)

s <- c(shortest.paths(g,2))

which(s == max(s))

get.shortest.paths(g,2,21)