Shiny：VerbatimTextOutputで単語分割を停止

いくつかのテキストボックスでShinyアプリケーションを作成しようとしています。私はverbatimTextOutputにテキストの周りにボックスがあるのが好きですが、わずかに長いテキストでは、テキストをラップするために意味のない場所で単語が壊れてしまいます。単語が分割されないようにする方法はありますか？非常に簡単な例を以下に示します。Shiny：VerbatimTextOutputで単語分割を停止

ui <- fluidPage(
    fluidRow(column(3, offset=0, verbatimTextOutput("TxtOut"))) 
) 

server <- function(input, output, session) { 
    output$TxtOut <- renderText(
    "a longish text that goes over multiple lines and breaks words" 
) 
} 

shinyApp(ui = ui, server = server)

出典

2017-10-24 nm200

'カラム幅はあなたのテキストを壊しています。それは '3'に設定されます。テキストはその境界線にラップします。 – Sagar

同じ幅を維持する必要がある場合は、次のようにスクロールを追加してテキストの折り返しを停止します。 @ – Sagar

@ Sagar、すばらしい、驚くべきことに、@ head @タグ（$ TxtOut {white-space：nowrap;} "））、 fluidRow（3、オフセット= 0、verbatimTextOutput（" TxtOut "））ありがとう、それはトリックを行います。私はページ上にある他のもののために列の幅を小さく保つ必要がありました。あなたが答えとしてそれを提出すれば私はそれを受け入れるでしょう。 – nm200

column幅が3に設定されているため、あなたのテキストは出力関数でラップしています。上記のコメントで説明したように、styleに従うと、折り返しが防止され、移動するスクロールバーが追加されます。

ui <- fluidPage(
    tags$head(tags$style("#TxtOut {white-space: nowrap;}")), 
    fluidRow(column(3, offset=0, verbatimTextOutput("TxtOut"))) 
)

出典

2017-10-24 17:29:09 Sagar

Shiny：VerbatimTextOutputで単語分割を停止

答えて

関連する問題