R Shiny应用无输出问题求助：输入值加1功能失效

Let's break down the problems in your code that are preventing the output from showing up—there are a few syntax and structure mistakes to fix:

Key Issues in Your Code #

• UI Structure & Parenthesis Mismatch: Your radioButtons call isn't properly closed with a parenthesis, and you accidentally nested mainPanel inside the radioButtons arguments. This breaks the entire UI layout, so the main panel (where your output should appear) isn't being rendered at all.
• Case Sensitivity Error: In the server function, you used Input$expn instead of lowercase input$expn—Shiny uses lowercase input for the input object, so this was causing your app to fail to access the user's input value.
• Incorrect Use of print(): The renderText function needs to return the text you want to display. Using print() only sends the result to your R console, not to the Shiny app's frontend.
• Extra Quotes in Input ID: You wrapped QC_Type in single quotes in the radioButtons inputId—this would have caused issues if you tried to use that input later, as Shiny would look for an input named 'QC_Type' (with quotes) instead of QC_Type.

Corrected Code #

ui <- shinyUI(fluidPage(
  titlePanel("alpha"),
  sidebarPanel(
    numericInput("expn", "Please enter total number of reports received", 1, min = 0, max = 1000000 ),
    radioButtons(
      inputId = "QC_Type",
      label = "QC Type",
      choices = c("Overall", "Solicited", "Spontaneous", "Clinical Trial","Literature")
    )
  ),
  mainPanel(
    textOutput("results")
  )
))

server <- function (input, output) {
  output$results <- renderText({
    1 + input$expn
  })
}

shinyApp(ui = ui, server = server)

What Changed? #

I reorganized the UI structure to properly close all parentheses and place mainPanel as a direct child of fluidPage (not nested inside radioButtons). I also fixed the lowercase input reference, removed the unnecessary print() call, and cleaned up the input ID quotes.

Now when you run this code, entering a number in the numeric input will display that number plus 1 in the main panel as expected.

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