用户数据作为闪亮的变量

Question

我正在构建一个应用程序来使用包“shiny”和“openair”来分析风数据。

我正在尝试读取用户提供的输入数据并将其用作变量，但我不断收到：

Error in updateSelectInput(session, "pollutant", choices = names(df)) : 
  object 'session' not found
ERROR: [on_request_read] connection reset by peer

在 ui.r 我有：

selectInput("pollutant", "Please choose pollutant", names(userdata))

在 server.r 中：

observe({
    df <- userdata()
    str(names(df))
    if (!is.null(df)) {
      updateSelectInput(session, "pollutant", choices = names(df))   
    }
  })

Answer 1

听起来您没有在服务器定义中包含session 变量？即使用(input, output, session) 而不仅仅是(input, output)。