R闪亮的反应时间在特定时间而不是特定时间间隔触发

时间:2017-10-20 21:01:50

标签: r shiny

希望是一个简单的问题。我在一个闪亮的应用程序中有这样的一行,工作正常:

public  static void AgreeAllow( TouchAction t,WebDriverWait w,AndroidDriver d,PageObjectOne p) throws InterruptedException{

...
...

}

无论如何设置一个事件来执行每分钟5分钟而不是仅仅设置间隔?因此,例如,如果应用程序在下午6:03启动,它将在下午6:05然后下午6:10然后下午6:15执行反应元素等。

1 个答案:

答案 0 :(得分:2)

它可能取决于您尝试更新的反应元素,但您可以想象使用floor_date包中的反应式轮询和lubridate

所以,你有一些依赖于reactivePoll函数提供的数据的反应元素,这个数据每隔5分钟更新一次,如下所示:

data <- reactivePoll(intervalMillis = 60000, session,
                        checkFunc = function() {
                          #check the time, rounded down to the previous 5 minute interval
                          lubridate::floor_date(Sys.time(), "5 mins")
                        },

                        valueFunc = function() {
                          #if checkFunc value has changed since the last check, return some updated value or updated dataset
                          get_value()                          
                        }
)