闪亮:renderPrint 一个没有 [1] 且没有转义字符的字符串

Shiny: renderPrint a string without [1] and without escape characters

如何在 Shiny S 中打印字符串 ...

示例

library("shiny")

# Define UI ----
ui <- fluidPage(
  
  mainPanel(
    verbatimTextOutput("showstring")
  )
)

# Define server logic ----
server <- function(input, output) {

  output$showstring <- renderPrint({
    
    mystring <- "DOI (\"10.3390/ijerph15010052\")"
    
    mystring
    
  })
}

# Run the app ----
shinyApp(ui = ui, server = server)

当前(坏)结果:

答案(感谢评论中的 Limey)是使用 renderText 而不是 renderPrint