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
})