shinyTree: ver sin seleccionar

Considera lo siguiente: library(shiny) library(shinyTree) server <- shinyServer(function(input, output, session) { output$tree <- renderTree({ list( 'I lorem impsum'= list( 'I.1 lorem impsum' = structure(list('I.1.1 lorem impsum'='1', 'I.1.2 ...