使用eventReactive时出现Object not found错误的Shiny应用问题排查

你遇到的Error in dots_list(...) : object 'df_opt' not found错误，核心原因是UI组件的inputId没有用字符串包裹，另外还有几个变量名不匹配、数据未定义的小问题，我帮你逐一梳理并修正：

主要错误点 #

• UI中radioButtons的inputId = df_opt和actionButton的inputId = df_button都没有加引号，Shiny会把它们当成变量而非字符串ID，导致找不到对应对象
• radioButtons里的choices = df_choices写错了，你定义的选项变量是choices_df
• 代码里用到的df1到df4没有定义，需要先模拟测试数据才能正常运行
• eventReactive里的多个独立if逻辑存在风险：如果多个条件意外满足，会返回最后一个符合条件的结果，换成else if或者switch更严谨
• 初始状态下用户未点击按钮时，df_selected()会返回NULL，可能导致表格渲染出错，可以添加参数让初始状态也能返回默认值

修正后的完整可运行代码 #

library(shiny)
library(DT)

# 先模拟测试用的四个dataframe
df1 <- data.frame(ID = 1:5, Value = rnorm(5))
df2 <- data.frame(Name = c("Alice", "Bob", "Charlie"), Age = c(25, 30, 35))
df3 <- data.frame(Product = c("A", "B", "C"), Price = c(10, 20, 30))
df4 <- data.frame(Month = 1:12, Sales = runif(12, 100, 200))

choices_df <- c("opt1", "opt2", "opt3", "opt4")
ui <- fluidPage(
  sidebarLayout(
    sidebarPanel(
      radioButtons(
        inputId = "df_opt",  # 给inputId加引号
        label = "Choose a database", 
        choices = choices_df,  # 修正变量名
        selected = choices_df[1]
      ),
      actionButton(
        inputId = "df_button",  # 给inputId加引号
        label = "Load Selected Data"  # 给按钮加明确标签，提升用户体验
      )
    ),
    mainPanel(
      DT::dataTableOutput("base_p1")
    )
  )
)

server <- function(input, output) {
  df_selected <- eventReactive(
    input$df_button,
    {
      # 用switch替代多个if，代码更简洁易维护
      switch(input$df_opt,
             "opt1" = df1,
             "opt2" = df2,
             "opt3" = df3,
             "opt4" = df4
      )
    },
    ignoreNULL = FALSE,  # 允许初始状态（未点击按钮）也能返回值
    value = df1  # 设置初始默认返回df1，页面加载就有数据展示
  )
  
  output$base_p1 <- DT::renderDataTable(
    df_selected(), 
    filter = "top"
  )
}

shinyApp(ui = ui, server = server)

关键修改说明 #

1. Input ID加引号：所有UI组件的inputId必须是字符串格式，比如"df_opt"，这样Shiny才能正确识别输入对象
2. 修正变量名：把错误的df_choices改成你提前定义好的choices_df
3. 添加测试数据：模拟了df1到df4四个数据集，保证代码可以直接运行验证
4. 优化逻辑判断：用switch替代多个if，逻辑更清晰，后续新增选项也更容易扩展
5. 初始值设置：通过ignoreNULL = FALSE和value = df1，让页面加载时就显示默认数据集，不需要用户先点击按钮

这样修改后，你的应用就能正常运行，用户选择不同选项并点击按钮后，就能展示对应的数据集了。

内容的提问来源于stack exchange，提问作者Pascual Esteban