data-raw/hard/while2.R

params <- 8:12
m <- (2*n) %/% 3
while(n >= 1 || m >= 1) {
  if(n < m) {
    cat(m, '')
    m <- m / 2
  } else {
    cat(n, '')
    n <- n / 2;
  }
}
arnaud-m/XLUniv documentation built on Jan. 23, 2023, 4:23 p.m.