R闪亮:更改uiOutput包装器

Question

每次我使用renderUI (服务器端)和uiOutput (UI端)时，html都是由div包装的，我如何用span来包装它呢？

例如：

UI侧：

tags$p(uiOutput("my_variable"))

服务器端：

output$currentLev1 <- renderUI({return(input$my_variable)})

结果：

<div id="my_variable" class="shiny-html-output shiny-bound-output">my_variable</div>

预期结果：

<span id="my_variable" class="shiny-html-output shiny-bound-output">my_variable</span>

(只需按跨度更改div )

谢谢你的帮助

Answer 1

使用参数inline=T创建一个span，而不是div：

> args(uiOutput)
function (outputId, inline = FALSE, container = if (inline) span else div, 
    ...) 
NULL

因此：

> uiOutput("test", inline=T)
<span id="test" class="shiny-html-output"></span>