我在R中我的图形的两个节点之间的距离有问题。 我在这里建立了一个图表:
library(graph)
library(RBGL)
names <- c("a", "b", "c")
g <- new("graphNEL")
g <- addNode(names[1],g)
g <- addNode(names[2],g)
g <- addNode(names[3],g)
g <- addEdge(from=names[1],to=names[2],g)
g <- addEdge(from=names[2],to=names[3],g)
dist <- sp.between(g,names[1],names[3])
dist
# OUTPUT
$`a:c`
$`a:c`$length
[1] 2
$`a:c`$path_detail
[1] "a" "b" "c"
$`a:c`$length_detail
$`a:c`$length_detail[[1]]
a--b b--c
1 1
不,我可以通过以下方式获得长度:
dist$`a:c`$length
[1] 2
但是如何在$ a:c` $ length中获得没有typin的长度我只想使用变量,比如使用循环来计算距离..
dist$names[1]:names[3]$length
答案 0 :(得分:0)
由于结果是两个节点之间所有最短路径的列表,
您可以使用[[1]]
获取第一个,并提取其长度。
dist[[1]]$length