shinyTree: visualize sem selecionar

Considere o seguinte:

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 lorem impsum'='2'),stselected=TRUE),  
      'I.2 lorem impsum'   =  structure(list('I.2.1 lorem impsum'='3'), stselected=TRUE))) 
  })
})
ui <- shinyUI(
  shiny::fluidPage(
    h4('Shiny hierarchical checkbox')
    ,shinyTree("tree", checkbox = TRUE)
  )
)
shinyApp(ui, server)

Como posso fazer isso para que, por padrão,Nenhum acima são selecionados, mas sãoainda exibido?

Se eu definir ambosstselected = FALSE no código acima, eu recebo

qual éNÃO o que eu quero; Gostaria das opções acima com as caixas de seleção desmarcadas.

Links para referências on-line em documentação adicional com código seriam extremamente úteis. A documentação do pacote parashinyTree não é útil.

questionAnswers(1)

yourAnswerToTheQuestion