shiny - 具有默认选定值的 ShinyTree
解决方案
将所需节点的“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
})