R重做迭代循环

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
  }
}

但请注意，现在这是一个无限循环......