html - 闪亮的渲染文本：一半斜体，一半不是？

Question

在我闪亮的应用程序中，我有一个名为 acronym 的 textOutput，我想在其中渲染一些半非斜体、半斜体的文本。

我试着这样做：

output$acronym_1 <- renderText(paste("SID SIDE:", tags$em("Siderastrea siderea")))

但这并没有得到斜体字的下半场。我该怎么做呢？提前致谢。

Answer 1

以下代码将生成斜体文本

library(shiny)

ui = fluidPage(uiOutput("htmlText"))

server <- function(input, output)
  output$htmlText <- renderUI(HTML(paste(
    "Non-italic text.", em("Italic text")
  )))

shinyApp(ui, server)

我不认为textOutput能够进行文本标记，因为输出字符串将cat根据文档创建。

renderText ( expr , env = parent.frame(),quoted = FALSE, outputArgs = list())

expr 返回可用作cat参数的 R 对象的表达式。