Горячие клавиши для запуска реактивных потоков в R Shiny?

Question

Можно ли, скажем, F7 или Q активировать реактивный поток в блестящем приложении (в Windows)? This question предоставляет код для чередующихся вкладок с клавиатурным вводом, но меня интересует запуск реактивных потоков. Например, кнопка «запускается» каждый раз, когда пользователь нажимает на клавиатуре Q.

Answer 1

Вот пример, основанный на this answer:

library(shiny) 

runApp(shinyApp(
    ui = fluidPage(
    tags$script(HTML("$(function(){ 
     $(document).keyup(function(e) { 
     if (e.which == 81) { 
     $('#button').click() 
     } 
     }); 
     })")), 
    actionButton("button", "An action button"), 
    textOutput("text")), 
    server=function(input, output, session) { 
    output$text <- renderText({input$button}) 
    } 
)) 

Вы можете использовать this page найти код ключа, который вы хотите использовать в яваскрипта коде. В этом примере, если нажать q, элемент с идентификатором button будет нажат.