使用"While"功能计算循环次数

Question

我想计算函数在超过条件之前重复的次数.例如;

y=0
while(y<10) {
  y=y+2
  print(y)
}

[1] 2
[1] 4
[1] 6
[1] 8
[1] 10

显然,该函数重复了5次,但我怎样才能在R中显示这个？

Answer 1

你几乎拥有它.

y <- i <- 0
while(y < 10) {
  i <- i + 1
  y <- y + 2
  print(y)
}
print(sprintf("The loop repeated %s times.", i))