R：使用输入参数从数据框中选择和显示值

我正在尝试使用R为一些置信区间创建一个查找函数。基本前提是有人输入分子和分母，然后显示下限和上限。（我意识到有很多更简单的方法可以做到这一点，但这只是一个例子）

我有一个数据框，其中有一列表示分子（succ）、分母（num），还有一列表示下限（a）和上限（b）。我认为UI还可以，但我不知道如何在num==num和succ==succ的位置显示a和b的值。我对这一点很陌生，如果这是一个基本问题，我深表歉意

我的代码如下，本质上我希望这些值显示在各自的上下标题下

library(shiny)

ui <- fluidPage(
h3("Calculate your uncertainty intervals"),

numericInput("num", label = h4("Number of Tests"), value = 5 , min = 1, max = 10),
numericInput("succ", label = h4("Number of Positive Results"), value = 0, min = 0),

h4("Lower Bound"),
verbatimTextOutput("lower"),

h4("Upper Bound"),
verbatimTextOutput("upper")
)

server <- function(input, output) {
 l <- reactive({
 a <- subset(bounds, num==input$num & succ==input$succ, select=a)
 return(a)
 })
 u <- reactive({
 b <- subset(bounds, num==input$num & succ==input$succ, select=b)
 return(b)
 })
 output$lower <- renderText({
 l
  })
 output$upper <- renderText({
 u
  })
}

shinyApp(ui = ui, server = server)

库（闪亮）
ui我不知道它是否能解决所有问题，但我确信必须用括号来调用反应对象：

output$lower <- renderText({
 l()
  })
output$upper <- renderText({
 u()
  })

output$lower当我看到您调用无括号的被动对象时，请尝试添加它们：
output$lower谢谢您的帮助。不幸的是，它似乎仍然不起作用。在我希望显示答案的地方，我得到了一个错误：参数1（类型“list”）不能由“cat”处理