r - teclado - no funcionan los gestos del touchpad windows 10

Mostrar el menú de la barra lateral al pasar el mouse sobre la pared de la pantalla izquierda

Question

sería posible mostrar la barra lateral en el control deslizante con el mouse en el lado izquierdo de la pantalla después de ocultarlo con

library(shiny)
library(shinydashboard)
library(shinyjs)

ui <- shinyUI(dashboardPage(
  dashboardHeader(),
  dashboardSidebar(),
  dashboardBody(
    useShinyjs()
  )
))

server <- shinyServer(function(input, output, session) {
  addClass(selector = "body", class = "sidebar-collapse")
})

shinyApp(ui = ui, server = server)

como Dean explicó en esta publicación: aquí

Si alguien sabe cómo hacerlo, estaría muy agradecido.

marca