如何在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。