Как найти ранг узла в rgraphviz?

Question

У меня есть ориентированный ациклический граф в rgraphviz, он будет отображаться как граф DOT. Я хочу контролировать внешний вид узлов на основе его ранга. Как найти ранг узлов?

Answer 1

Вот мой ответ. Предложения приветствуются.

Gr является объектом формального класса GRAPHNEL

gx <- layoutGraph(gR) #can also add node attributes, sublists here 
x <- gx@renderInfo@nodes$nodeX 
y <- gx@renderInfo@nodes$nodeY 
#x and y are named vectors with node names and x/y coordinates 
#to get the names of the nodes on the top rank: 
topNodes1 <- names(y[y==max(y)])