R 我怎样才能向后循环？

我想在字符串中循环1次，然后等待30秒，然后重新运行循环，但这次是从最后一个循环到第一个循环 我试图这样做，但没有成功：

for( c in 1:2){
if (c==1) for (i in 1:4){
if (c==2) for (i in 4:1){
print(i)
if(c==1) Sys.Sleep(30)
}
}

试试这个：

for( c in 1:2){
  if(c==1){
    st = 1
    fin = 4
  }else{
    Sys.sleep(30)
    st = 4
    fin = 1
  }
  for (i in st:fin){
      print(i)
  }


}

---

所以你想让你的输出看起来像1，4，3，2，1？在1和4之间有30秒的延迟？我想做一些类似于我所展示的例子的事情，比如我写的例子，它应该打印1,2,3,4，然后延迟30秒，然后打印4,3,2,1

，用于（1:4中的I）打印（I）；睡眠系统（30）；对于（4:1中的i）打印（i）

太好了！请把答案记下来。