重做迭代for循环

Question

如果某个条件为真，R中是否有一种方法可以重复给定计数的for循环?

这就是我现在正在尝试的

for(i in 1:4){
  if(i == 4){
    i <- i-1
  }else{print(i)}
}

在本例中，我希望输出为

[1] 1
[2] 2
[3] 3
[4] 3
[5] 3
[6] 3
...

Answer 1

用while循环代替:

i <- 1
while(i <= 4){
  if(i == 4){
    i <- i-1
  }else{
    print(i)
    i <- i + 1
  }
}

但是要注意这是一个无限循环