Почему в stCuts возникает ошибка «В st-cuts.c: 415: Неверный идентификатор корневой вершины для дерева-доминатора, Неверное значение»? - PullRequest
0 голосов
/ 12 ноября 2018

У меня есть следующая матрица EdgesGroep в качестве входных данных для graph.adjacency (извините за уродливый способ дать матрицу):

 [1,] 0 0 0 0 0 0 0 0 0  0  0  0  0
 [2,] 0 0 0 1 0 0 0 0 0  0  0  0  0
 [3,] 0 0 0 0 0 0 0 0 0  0  0  0  0
 [4,] 0 1 0 0 0 0 0 0 0  0  0  0  0
 [5,] 0 0 0 0 0 1 0 0 1  1  1  0  0
 [6,] 0 0 0 0 1 0 1 0 0  0  0  0  0
 [7,] 0 0 0 0 0 1 0 0 0  0  1  0  0
 [8,] 0 0 0 0 0 0 0 0 0  1  1  1  0
 [9,] 0 0 0 0 1 0 0 0 0  1  0  0  0
[10,] 0 0 0 0 1 0 0 1 1  0  1  0  0
[11,] 0 0 0 0 1 0 1 1 0  1  0  0  0
[12,] 0 0 0 0 0 0 0 1 0  0  0  0  0
[13,] 0 0 0 0 0 0 0 0 0  0  0  0  0

EdgesGroep <- as.matrix(EdgesGroep)
colnames(EdgesGroep) <- 1:dim(EdgesGroep)[1]
g1 <- graph.adjacency(EdgesGroep, mode="directed", weighted=NULL)
tkplot(g1)
V <- V(g1)
E <- get.edgelist(g1)
mode(E) <- "integer"
stCuts(g1, source=V[7], target=V[8])

Тогда возникает ошибка

Ошибкав stCuts (g1, source = V [7], target = V [8]): at st-cuts.c: 415: недопустимый идентификатор корневой вершины для дерева-доминатора, недопустимое значение

I на самом делехочу получить разрезы между всеми парами узлов.У меня уже есть код для этого, но тогда должна работать функция stCuts.

Может кто-нибудь помочь узнать, что делать, чтобы исправить ошибку?

...