tests/indent/r/loop.R


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

x <- 1

while (x < 10) {
  x <- x + 1
  break
}

for (i in 1:3) {
  x <- x + 1
}

repeat {
  x <- x + 1
  if (x > 100) {
    break
  }
}