R Shiny：更改 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 创建跨度而不是 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>

R Shiny: Change uiOutput wrapper