2015-12-17 145 views
6

有没有什么方法可以适应shinydashboard上的文字换行?默认行为似乎是因为它蔓延到身体区域。shinydashboard边栏菜单溢出

我想避免修改CSS直接然而如果是涉及到修改CSS作为服务器/ UI代码,然后本身我打开那一部分的解决方法。

ui <- dashboardPage(
    dashboardHeader(
     title = "Sidebar spill" 

    ), 
    dashboardSidebar(
     sidebarMenu(
     menuItem(text = "sfsdf sfaosh oas fwue wi aseiu wehw wuer woeur owuer ") 
     ) 
    ), 
    dashboardBody(
     fluidRow(

    ) 
    ) 
) 

server <- function(input, output) { 

} 

shinyApp(ui, server) 
} 
+0

这听起来像的东西,可以通过设置你的CSS来解决。就像这样:http://www.w3schools.com/cssref/css3_pr_word-wrap.asp – Shape

+0

我试过了,还有一些其他的CSS技巧,但一直无法获得解决方案。我管理的最好的是带有“溢出”的滚动条。 – TheComeOnMan

+0

如果你想修改它作为代码的一部分,你总是可以使用'tags $ head(tags $ style(PUTCSSCODEHERE))'。如果你愿意从'renderUI'返回这些标签,你总是可以以编程方式粘贴你的css。 – Shape

回答

0

怎么样像这样

... 
    dashboardSidebar(
    sidebarMenu(
     tags$div(class="header", checked=NA, 
       tags$p("sfsdf sfaosh oas fwue", tags$br(), "wi aseiu wehw wuer woeur owuer") 
    ) 
    ) 
), 
... 
+0

这将适用于这个孤立的情况。它可能不适用于不同的显示器或不同的项目。 – TheComeOnMan

+0

也许你应该为你的问题添加另一个例子(或者你说的不同的显示):) – MLavoie

+0

任何时候我改变文本,我将需要重新计算'tags $ br()'的位置。这就是为什么它不适用于不同的物品。 – TheComeOnMan

2

文件“AdminLTE.min.css”(这个版本反正在这个版本Shinydashboard的)指定为“白色空间:!NOWRAP重要”对于“侧边栏菜单”类以及带有“头部”类的“李”元素,它们是具有“边栏菜单”类的元素的直接后代。我看到我的Shinydashboard应用程序的边栏菜单中的“li”元素没有“header”类,所以我忽略了“white-space:nowrap!important”(这是因为“ul”元素包含菜单的类“边栏菜单”)通过添加以下CSS到一个自定义的CSS文件:

.sidebar-menu > li { 
    white-space: normal; 
}