Shiny 不会在模块中呈现 uiOutput 数据

Question

我有这个代码：

columnSelectorUI <- function(id) {
  ns <- NS(id)
  return(
    wellPanel(
      h4("Select columns"),
      uiOutput(ns("tab"))
    ))
}

columnSelectorServer <- function(input, output, session) {
  print("XXX")
  state <- reactiveValues()
  print(renderUI({h2("hello")}))
  print(output)
  output$tab <- renderUI({div(HTML("hello"))})
}

我看到的是：

• 打印了XXX，所以调用了服务器函数
• 渲染了 h4“选定的列”
• 渲染了 uiOutput 元素，但没有渲染其内容。

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

Answer 1

已解决：当顶层小部件调用 UI 组件时，我错过了 ns() 调用。