在r中重复循环直到一定次数

Question

我有一个要重复的功能，直到满足条件为止。但是，如果重复超过100次并且仍然不满足条件，则我想停止重复循环。我怎样才能做到这一点？示例代码为：

repeat{
 m<- rexp(1)+2
 if(m<10){break}
}

修改后的代码2：

counter<- 0
while(counter<=100){
  counter<- counter+1
   m<- rexp(1)+2
  if (m<10){break}
}

Answer 1

您也可以在break循环中使用for：

for(i in 1:100) {
   # some computations
   if (whateveconditionyoulike) break
}

Answer 2

counter <-0   
ok <-1
while (ok=1 AND counter <=100)
{
 if (condition)
          ok <- 0
 counter <-counter+1
}

用问题的实际条件替换if（condition）

Answer 3

i <- 0
repeat {if (i==101 | (rexp(1)+2>2.8)) break;print(i);i<-i+1}

2.8只是满足的随机条件。您可以使用任何其他条件。