闪亮：renderPrint不带[1]和转义字符的字符串

我如何打印一个闪亮的S字符串

• 没有

  [1]

• 没有开始和结束引号

  “

• 没有转义字符

示例：

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)

库（“闪亮”）
#定义用户界面----
ui答案（感谢评论中的Limey）使用
renderText
而不是
renderPrint
使用
renderText
而不是
renderPrint
。谢谢，利米-完美的解决方案。我很尴尬，因为回复似乎很简单。你应该将其作为回复发布，以便我可以将其勾选为正确的，从而“关闭”问题（对于可能的其他用户）。（但我知道，而且您似乎并不那么热衷于获得虚拟积分！）