Как сделать паузу выполнения, сон, подождать X секунд в R?

Как сделать паузу в сценарии R на указанное количество секунд или миллисекунд? Во многих языках есть sleepфункция, но она ?sleepссылается на набор данных. И так ?pauseи ?waitне существует.

Предполагаемое назначение - самосинхронизация анимации. Желаемое решение работает без запроса пользователя.

Смотрите 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 

Sys.sleep () не будет работать, если загрузка ЦП очень высока; как и другие критически важные процессы с высоким приоритетом, выполняющиеся (параллельно).

Этот код работал у меня. Здесь я печатаю от 1 до 1000 с интервалом 2,5 секунды.

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
}