在我闪亮的应用程序中,我有一个名为acronym的文本输出,我想在这里呈现一些半非斜体、半斜体的文本。
我试着这样做:

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

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

最佳答案

以下代码将生成斜体文本

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对象的表达式。

关于html - Shiny 的renderText:一半斜体,一半不斜体?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/44889684/

10-12 20:00