r - 如何在闪亮的仪表板中的 paste0() 函数内换行

Question

我正在尝试在 shinydashboard 服务器部分打印 2 行文本，并且 "\n" 似乎不起作用

    output$textbox_ID <- renderText(
    {
           paste0("Apples \n Bananas")
    }
    )

标签： rshinydashboard

Answer 1

首先\n是 unicode 换行符，对于闪亮的你需要 HTML 换行符，即<br>. 这是一个使用的解决方案，renderUI因为我不确定是否可以在renderText.

用户界面

uiOutput('textbox_ID')

服务器

output$textbox_ID <- renderUI(
{
  HTML(paste0("Apples",br()," Bananas"))
}

)

如果您不需要从服务器端检索某些内容，则可以直接在UI中使用以下内容：

helpText( HTML(paste0("Apples",br()," Bananas")))
#OR
HTML("Apples <br> Bananas")