在我闪亮的应用程序中,我有一个名为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/