ShinyTree パッケージとそのチェックボックス オプションを使用しています。
library(shiny)
library(shinyTree)
server <- shinyServer(function(input, output, session) {
# Defining lists inside list and rendering it in the shinyTree
output$tree <- renderTree({
list(
root1 = "123",
root2 = list(
SubListA = list(leaf1 = "", leaf2 = "", leaf3=""),
SubListB = structure(list(leafA = "", leafB = ""),stselected=TRUE)
)
)
})
})
ui <- shinyUI(
pageWithSidebar(
# Application title
headerPanel("shinyTree with checkbox controls"),
sidebarPanel(
mainPanel(
# Show a simple table with checkbox.
shinyTree("tree", checkbox = TRUE)
))
)
shinyApp(ui, server)
上記のコードの実行中に sublistB を選択すると、その子も選択されます。
SublistB が選択されましたが、子の leafA と leafB も選択されています
subListB のみを選択し、その葉を選択しないようにするにはどうすればよいですか。