r - 如何在 R 中使执行暂停、睡眠、等待 X 秒？

Question

如何将 R 脚本暂停指定的秒数或毫秒数？在许多语言中，有一个sleep函数，但?sleep引用了一个数据集。并且?pause不?wait存在。

预期目的是用于自定时动画。所需的解决方案无需用户输入即可工作。

Answer 1

见help(Sys.sleep)。

例如，从?Sys.sleep

testit <- function(x)
{
    p1 <- proc.time()
    Sys.sleep(x)
    proc.time() - p1 # The cpu usage should be negligible
}
testit(3.7)

屈服

> testit(3.7)
   user  system elapsed 
  0.000   0.000   3.704 

Answer 2

如果 CPU 使用率很高，Sys.sleep() 将不起作用；就像其他关键的高优先级进程正在运行（并行）一样。

这段代码对我有用。在这里，我以 2.5 秒的间隔打印 1 到 1000。

for (i in 1:1000)
{
  print(i)
  date_time<-Sys.time()
  while((as.numeric(Sys.time()) - as.numeric(date_time))<2.5){} #dummy while loop
}