Display sidebar menu when hovering on wall with left screen

Question

it would be possible to display the sidebar on the hover with the mouse on the left side of the screen, hiding it with

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) 

as Dean explained in this post: here

If anyone knows how to do this, I would be very grateful.

Mark