verbatimTextOutput中的分词/分词,闪亮

问题描述 投票:1回答:1

我经历过类似的话题,但没有找到答案。我想知道是否有人在VerbatimTextOuput中以闪亮的方式找到了单词拆分的解决方案。这是一个带有拆分词的示例。如何使它们不分裂(不使用滚动条)?

ui <- fluidPage(
  fluidRow(column(3, 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)

谢谢!干杯

split shiny word
1个回答
0
投票

也许这就是您想要的。

library(shiny)

ui <- fluidPage(
  tags$style(
    HTML(
      "
        #TxtOut {
        white-space: pre-wrap;
        }

      "
    )
  ),
  fluidRow(column(3, 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)

enter image description here

© www.soinside.com 2019 - 2024. All rights reserved.