如何暂停R脚本达指定的秒数或毫秒数?在许多语言中,有一个sleep
函数,但?sleep
引用了一个数据集。 ?pause
和?wait
不存在。
预期目的是自定时动画。所需的解决方案无需用户输入即可运行。
答案 0 :(得分:127)
请参阅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
答案 1 :(得分:5)
如果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
}