Каковы мои варианты реализации ввода текста с несколькими строками / разрывами строк (либо явными, либо просто мягкими переносами для лучшего вывода в пользовательском интерфейсе) в блестящем?

Я хотел бы реализовать приложение, которое имеет поле описания / подробности, и вводимый контент, скорее всего, будет состоять из одной строки.

По сути, я ищу что-то, чтобы реализовать аналогичную функциональность самого текстового поля ввода 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)