shiny - 具有默认选定值的 ShinyTree

Question

我正在尝试实现具有默认选定值的 shinyTree。有人知道这是否可能吗？

我在文档或包附带的示例中找不到任何内容。

感谢所有的帮助。

Answer 1

将所需节点的“stselected”属性设置为 TRUE

例子：

output$tree <- renderTree({
   sss=list('Nodes' = list('Node1' = '1', 'Node2' = '2'))
   attr(sss[[1]][['Node1']],"stselected")=TRUE # <---
   attr(sss[[1]],"stopened")=TRUE
   sss
})