闪亮的应用程序不会像我期望的那样增加变量

Question

我不明白为什么在按下上一个和下一个按钮之间将current_row变量重置为其初始值。

TY

U

Answer 1

current_row = current_row + 1中的

observeEvent实际上并未在全局环境中更新current_row的值。您需要<<-。但是，极不建议在shiny中使用它。考虑问一个关于您到底需要什么的单独问题，以便人们可以为您指明正确的方向。

current_row = 0

shinyApp(
  ui = fluidPage(
    actionButton("next_button", "next"),
    actionButton("previous_button", "previous")
  ),
  server = function(input, output, session) {

    observeEvent(input$next_button, 
                 {
                   current_row <<- current_row + 1 
                   print (current_row)
                 }) 

    observeEvent(input$previous_button, 
                 {
                   current_row <<- current_row - 1 
                   print (current_row)
                 }) 
  }
)