基本結構

MCVE 應該在控制檯中複製時啟動 Shiny 應用程式。一個簡單的方法是使用 shinyApp 函式。例如：

為什麼我的核取方塊沒有響應？

library(shiny)

ui <- fluidPage(
  checkboxInput('checkbox', 'click me'),
  verbatimTextOutput('text')
)

server <- function(input, output, session){
  output$text <- renderText({
    isolate(input$checkbox)
  })
}

shinyApp(ui, server)

或者，你也可以不為 ui 和 server 分配變數。

library(shiny)

shinyApp(
  fluidPage(
    checkboxInput('checkbox', 'click me'),
    verbatimTextOutput('text')
  ),
  function(input, output, session){
    output$text <- renderText({
      isolate(input$checkbox)
    })
  }
)

shinyApp(ui, server)