R-使脚本每X分钟运行一次，无论执行时间如何。

Question

我有一个可变执行时间的函数，但对于大多数用例来说，它将不到20秒。我想要一个脚本每10分钟执行一次该函数，无论函数实际需要多长时间（因此不能使用sleep命令或任何'wait'命令）

Answer 1

在你的循环中：

p1 <- Sys.time()
yourFunct()
theDelay <- 600-as.numeric(difftime(Sys.time(),p1,unit="secs"))
Sys.sleep(max(0, theDelay)

或在函数执行时添加相关处理＆gt; 10分钟，如果你不希望它立即再次运行