shinydashboardサイドバーメニューオーバーフロー

Question

何かの種類のテキストを単語ラップ付きのshinydashboardに収める方法はありますか？デフォルトの振る舞いは、ボディ領域にこぼれ落ちる可能性があります。

私はCSSを直接​​変更しないようにしたいと思いますが、サーバー/ユーザーコード自体の一部としてCSSを変更する回避策がある場合は、それを開いています。

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) 
} 

Answer 1

（とにかくそれのこのバージョンShinydashboardのこのバージョンでは）この

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

Answer 2

ファイル「AdminLTE.min.css」のようなものについて、何が「ホワイトスペース：nowrap属性が重要！」を指定します"sidebar-menu"クラスの要素の直接の子孫であるクラス "header"を持つ "li"要素だけでなく、 "sidebar-menu"クラスの場合も同様です。私は、私のShinydashboardアプリケーションのサイドバーメニューにある "li"要素に "header"クラスがないことを知ったので、 "white-space：nowrap！important"をオーバーロードしました。カスタムCSSファイルに次のCSSを追加することにより、カスタムCSSファイルを追加できます。

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