R Wiązanie z czystym kluczem wejściowym

Question

Czy w aplikacji Shiny możliwe jest wiązanie, które nasłuchuje, jaki klawisz użytkownik naciśnie?

nie jestem zbyt obeznany z JavaScript, ale szukam czegoś podobnego:

window.onkeydown = function (e) { 
    var code = e.keyCode ? e.keyCode : e.which; 
    alert(code); 
}; 

gdzie wejście klucz jest następnie do wykorzystania w server.R, np:

shinyServer(function(input, output) { 

    output$text <- renderText({ 
    paste('You have pressed the following key:', input$key) 
    }) 

    # ... 

}) 

Answer 1

Możesz dodać detektor dla naciśnięć klawiszy. Shiny.onInputChange mogą być stosowane do wiązania klawisz wciśnięty do zmiennej błyszczące:

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

    output$results = renderPrint({ 
    input$mydata 
    }) 
} 
)) 

dla keydown wydarzeń można zastąpić:

tags$script(' 
    $(document).on("keydown", function (e) { 
     Shiny.onInputChange("mydata", e.which); 
    }); 
    ')