Question

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

我有一个数据框，其中包含分子（succ），分母（num）和下限（a）和上限（b）各一列。我认为用户界面还可以，但我无法弄清楚如何获得a和b的值，其中num == num和succ == succ。如果这是一个基本问题，我是非常新的，所以道歉！

我的代码如下，基本上我希望将值显示在各自的上下标题下。

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)

Answer 1

I don't know if it will fix everything but i'm sure that you must put brackets to call a reactive object :

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

R Shiny：使用输入参数从数据框

1 个答案: