如何在R shiny中使用if/else语句查询数据

install.packages("shiny")

library(shiny)
shinyApp(
  ui = fluidPage(
    # 在这里添加用户界面元素
  ),
  server = function(input, output) {
    # 在这里添加服务器端逻辑
  }
)

ui = fluidPage(
  textInput("condition", "输入查询条件："),
  verbatimTextOutput("result")
)

server = function(input, output) {
  output$result <- renderPrint({
    if (input$condition == "条件1") {
      # 查询条件为条件1时的逻辑
      # 在这里执行查询操作，并返回结果
    } else if (input$condition == "条件2") {
      # 查询条件为条件2时的逻辑
      # 在这里执行查询操作，并返回结果
    } else {
      # 其他条件的逻辑
      # 在这里执行查询操作，并返回结果
    }
  })
}