我需要计算图中两个顶点之间最短路径的边属性的乘积。
例如:
data<-as.data.frame(cbind(c(1,2,3,4,5,1),c(4,3,4,5,6,5),c(0.2,0.1,0.5,0.7,0.8,0.2)))
G<-graph.data.frame(data, directed=FALSE)
set.edge.attribute(G, "V3", index=E(G), data$V3)
如果我根据属性计算最短路径我有两个可能性,第一个告诉我步骤:
get.shortest.paths (G, 2, 6, weights=E(G)$V3)
2 3 4 1 5 6
第二个告诉我沿路径的属性总和。
shortest.paths (G, 2, 6, weights=E(G)$V3)
1.8
由于我需要制作产品,因此我需要在路径的节点之间有一个边缘属性向量。在这个例子中,我应该得到 0.8 0.2 0.2 0.5 0.1,其乘积为 0.0016。谁能建议我怎么做?