我有哪些选择来实现带有多行/换行符的文本输入(显式或只是用于UI中的更好输出的软包装)?
我希望实现一个包含说明/详细信息字段的应用,并且输入的内容很可能不仅仅是一行。
基本上,我正在寻找能够实现stackoverflow的文本输入框的类似功能的东西我将这个问题写成:换行符,滚动条和/或(自动)调整高度。
# UI ---------------------------------------------------------------------
ui <- fluidPage(
p(),
textInput("title", "Title"),
textInput("description", "Description"),
tags$hr(),
h3("Database state"),
DT::dataTableOutput("datatable")
)
# Server ------------------------------------------------------------------
server <- function(input, output, session) {
output$datatable <- DT::renderDataTable(
data.frame(
Title = input$title,
Description = input$description,
stringsAsFactors = FALSE
)
)
}
shinyApp(ui, server)