闪亮的renderText:半斜体,一半不是?

时间:2017-07-03 15:48:26

标签: html shiny italics

在我的闪亮应用程序中,我有一个textOutput命名的首字母缩略词,我想在renderText中找到一些半非斜体,半斜体的文本。

我尝试这样做:

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

但这并没有以斜体显示下半场。我该怎么做呢? 提前谢谢。

1 个答案:

答案 0 :(得分: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对象。