註冊重複的鍵盤按下閃亮

Question

我試圖建立一個應用程序，其中鍵盤按下被捕獲，但我遇到的問題，如果相同的鍵盤按下連續使用然後閃亮似乎並沒有註冊輸入。想知道是否有辦法解決這個問題。例如：

例如，這是我的意思。

library(shiny) 
runApp(list(ui = bootstrapPage(
    verbatimTextOutput("results"), 
    tags$script(' 
    $(document).on("keydown", function (e) { 
     Shiny.onInputChange("down", e.which); 
    });'), 
    tags$script(' 
    $(document).on("keyup", function (e) { 
       Shiny.onInputChange("up", e.which); 
       });') 
) 
, server = function(input, output, session) { 

    output$results = renderPrint({ 
     print(rnorm(1)) 
     c(input$down, input$up) 
    }) 
} 
)) 

打字/鍵盤上的釋放不同的字符生成新的輸入，因此，當這些事件發生時的隨機數生成器被調用。但是打字時，比方說，'g''g''g'只記錄第一個上下鍵擊並忽略其餘部分。

Answer 1

Shiny.onInputChange只有當JS對象它引用改變反應，但你寫你的js方式的價值被重新分配到具有相同鍵的多次按壓同樣的事情。 一個醜陋的解決方法可能是使變量成爲按鍵和數組中的隨機浮動。

library(shiny) 
runApp(list(ui = bootstrapPage(
    verbatimTextOutput("results"), 
    tags$script(' 
       $(document).on("keydown", function (e) { 

       Shiny.onInputChange("down", [e.which,Math.random()]); 
       });'), 
    tags$script(' 
       $(document).on("keyup", function (e) { 

       Shiny.onInputChange("up", [e.which,Math.random()]); 
       });') 
) 
, server = function(input, output, session) { 

    output$results = renderPrint({ 
    print(rnorm(1)) 
    c(input$down[1], input$up[1]) 
    }) 
} 
)) 

消除生成隨機數的需要並傳遞一些潛在有用的信息可能更有效。例如使用timestamp屬性，您可以在按鍵上實現一些過濾。

library(shiny) 
runApp(list(ui = bootstrapPage(
    verbatimTextOutput("results"), 
    tags$script(' 
      $(document).on("keydown", function (e) { 

      Shiny.onInputChange("down", [e.which,e.timeStamp]); 
      });'), 
tags$script(' 
      $(document).on("keyup", function (e) { 

      Shiny.onInputChange("up", [e.which,e.timeStamp]); 
      });') 
) 
, server = function(input, output, session) { 

    output$results = renderPrint({ 
    print(rnorm(1)) 
    c(input$down[1], input$up[1]) 
    }) 
} 
))