nie jestem bardzo obeznany z pulpitów jak nigdy nie zbudował jeden, ale z podjęciem okiem, wydaje się, że po kliknięciu na przycisk open/ukryj bocznego, wszystko, co się dzieje, jest sidebar-collapse
klasa zostaje dodana/usunięta do znacznika <body>
. Może zdarzyć się więcej rzeczy, których nie jestem świadomy, ale to wydaje się najbardziej widoczne.
Więc można łatwo używać shinyjs pakiet (Zastrzeżenie: Jestem autora) do dodawania/usuwania tej klasy
library(shiny)
library(shinydashboard)
library(shinyjs)
shinyApp(
ui =
dashboardPage(
dashboardHeader(),
dashboardSidebar(),
dashboardBody(
shinyjs::useShinyjs(),
actionButton("showSidebar", "Show sidebar"),
actionButton("hideSidebar", "Hide sidebar")
)
),
server = function(input, output, session) {
observeEvent(input$showSidebar, {
shinyjs::removeClass(selector = "body", class = "sidebar-collapse")
})
observeEvent(input$hideSidebar, {
shinyjs::addClass(selector = "body", class = "sidebar-collapse")
})
}
)
Dziękuję bardzo, to działa bardzo dobrze. Właśnie się uczę o JS. – Geovany
Swoją drogą, używam twojej biblioteki (shinyjs) od pierwszego wydania. Jest to bardzo przydatne dla kogoś takiego jak ja, z bardzo podstawowym doświadczeniem z JS. Bardzo podoba mi się twoje podejście do biblioteki i faktycznie nauczyłem się wiele z kodu źródłowego. Dziękuję bardzo za tworzenie shinyjs :) – Geovany
Bardzo miło to słyszeć, dziękuję! –