）シャイニーR

Question

ピカピカRに新しいイム...ここに私のコードです...

ui.R

library(shiny) 
fluidPage(mainPanel(actionButton("run","RUN"))) 

server.R

function(input, output) { 
    observeEvent(input$run,{ 
       print("Start") 
       Sys.sleep(2) 
       print("End")}) 
} 

問題は...コンソールが前の "終了"を表示する前に実行を押すと、直前のobserveEventが終了するとすぐにobserveEventの実行を開始します... observeEventキューのパイプライン処理を停止する方法はありますか？ ??検索のビットの後

私が望むすべての機能が既に実行中である一方、「実行」ボタンをユーザーとの対話を停止することです...

Answer 1

は、私は最終的に私の目的を解決するソリューションを....得ました... 。

ui.R

library(shiny) 
library(shinyjs) 
fluidPage(shinyjs::useShinyjs(),mainPanel(actionButton("run","RUN"))) 

server.R

function(input, output) { 
    observeEvent(input$run,{ 
    shinyjs::disable("run") 
       print("Start") 
       Sys.sleep(2) 
       print("End") 
       shinyjs::enable("run")}) 
}