如何在R data.tree中使用SetNodeStyle引用頂層節點？

Question

我使用R包data.tree創建了一棵樹。我只想編輯頂層節點，但我不確定如何使用SetNodeStyle引用它。這裏是代碼：

library(data.tree) 

truven <- Node$new("truven") 
    opioid <- truven$AddChild("opioid") 
    iro.only <- opioid$AddChild("iro.only") 
    ero.n.iro <- opioid$AddChild("ero.n.iro") 
    ge.27mth <- ero.n.iro$AddChild("ge.27mth") 
    l.27mth <- ero.n.iro$AddChild("l.27mth") 
    ero.only <- opioid$AddChild("ero.only") 

SetGraphStyle(truven, rankdir = "TB") 
SetEdgeStyle(truven, arrowhead = "vee", color = "grey35", penwidth = 1) 
SetNodeStyle(truven, style = "filled,rounded", shape = "box", fillcolor = "Yellow", 
        fontname = "helvetica", tooltip = GetDefaultTooltip)  

SetNodeStyle(truven$truven, style = "filled,rounded", shape = "box", fillcolor = "Green", 
     fontname = "helvetica", tooltip = GetDefaultTooltip)  


plot(truven) 

注意我試着用truven $ truven引用頂層節點。它不起作用。

Answer 1

試試這個：

SetNodeStyle(truven$truven, style = "filled,rounded", shape = "box", fillcolor = "Green", inherit = FALSE, fontname = "helvetica", tooltip = GetDefaultTooltip) 

應該做工精細，我想你在SetNodeStyle功能錯過inherit = FALSE。