我正试图将侧边栏隐藏在闪亮的app中。
在身体上使用此功能:
tags$script(HTML("$('body').addClass('sidebar-mini');"))
我得到了这个结果:
有没有办法隐藏侧边栏,而不隐藏标题,只修改此脚本?
答案 0 :(得分:1)
假设您有一个名为“hide”的内置CSS类。
tags$script(HTML("$('.sidebar-mini #YOUR_SIDEBAR_ID').addClass('hide');"))
如果你想获得幻想,那么做绝对位置-9999和不透明度0之类的事情,然后在需要时“揭开它”......
答案 1 :(得分:1)
您可以定义简短标题,侧边栏折叠时会显示:
library(shiny)
library(shinydashboard)
shinyApp(
ui = dashboardPage(
dashboardHeader(
title = tagList(
tags$span(
class = "logo-mini", "Short"
),
tags$span(
class = "logo-lg", "My Long Title"
)
)
),
dashboardSidebar(),
dashboardBody(
tags$script(HTML("$('body').addClass('sidebar-mini');"))
),
title = "Dashboard example"
),
server = function(input, output) { }
)
}
正常:
已折叠: