R: Как пройти от корневого узла к каждому листовому узлу в объекте данных iGraph и получить путь?

Question

Я нов к R и у меня есть объект графа, который я создал из объекта фрейма данных «allTog», как показано ниже:

library(igraph) 
df.g <- graph.data.frame(d = allTog, directed = TRUE) 
plot(df.g, vertex.label = V(df.g)$name) 

Кадр данных allTog задается

allTog <- data.frame(
    source = c("chamber", "chamber", "chamber", "chamber", "chamber", 
    "check", "check", "issue", "issue", "issue"), 
    target = c("check", "issue", "leak", "process", "found", "power", 
    "customer", "customer", "wafer", "replaced") 
    ) 

Столбцы «row.names» и «values» здесь не представляют интереса.

Как я могу переходить от каждого корневого узла, в данном случае к «камере», к каждому листовому узлу и получить путь к всем именам узлов (вершин)? Я ищу универсальное решение, потому что мой корневой узел может меняться при каждом запуске кода. Например, в следующем запуске корневой узел может быть «проблемным».

Мой вывод, который я хочу это:

chamber->check->power 
chamber->issue->replaced 
chamber->process 
chamber->issue->customer 

Так и так далее ....

Answer 1

Как насчет

root <- "chamber" 
leafnodes <- sapply(V(df.g), function(x) length(neighbors(df.g,x))==0) 
paths <- get.all.shortest.paths(df.g, V(df.g)[root], leafnodes)$res 
sapply(paths, function(vs) paste(V(df.g)[vs]$name, collapse="->")) 

В этом списке перечислены все узлы листа вы можете получить до

# [1] "chamber->leak"   "chamber->process"   "chamber->found"   
# [4] "chamber->check->power" "chamber->issue->customer" "chamber->check->customer" 
# [7] "chamber->issue->wafer" "chamber->issue->replaced"