Suivi de shinyTree : afficher sans sélectionner .
library(shiny)
library(shinyTree)
server <- shinyServer(function(input, output, session) {
output$tree <- renderTree({
sss=list( 'I lorem impsum'= list(
'I.1 lorem impsum' = structure(list('I.1.1 lorem impsum'='1', 'I.1.2 lorem impsum'='2'),stopened=TRUE),
'I.2 lorem impsum' = structure(list('I.2.1 lorem impsum'='3'), stopened=TRUE)))
attr(sss[[1]],"stopened")=TRUE
sss
})
})
ui <- shinyUI(
shiny::fluidPage(
h4('Shiny hierarchical checkbox')
,shinyTree("tree", checkbox = TRUE)
)
)
shinyApp(ui, server)
Je voudrais définir une variable telle que si I.1.2. lorem impsum est sélectionné, elle a une valeur de 4
par exemple.
Tout ce que je sais, c'est que je dois utiliser reactive()
. Comme vous pouvez le constater aquí J'ai appris à le faire avec checkboxGroupInput
mais je ne suis pas sûr que cela puisse être fait dans le cadre d'une shinyTree
. Il n'y a pas de documentation à ce sujet que je puisse trouver en ligne.
Comment cela peut-il être fait ?
J'ai également vu les fonctions aquí mais je ne sais pas comment les utiliser.