r - 为什么我在 R 中的 "Fizz Buzz"测试不起作用？

Question

我听说这是一个常见的面试问题，请问这里有什么问题，谢谢。

for(i in 1:100){
  if(i%15==0){
    print('fizzbuzz')
  } else 
      if (i%3==0){
        print("fizz")
      } else 
        if (i%5==0) {
          print("buzz")
        } else 
          (print(i))
        }
      }

Answer 1

我会将大括号放在不同的位置，您需要更正运算符 -- %% 而不是 %。

for(i in 1:100) {
    if(i%%15==0){
        print('fizzbuzz')
    } else if (i%%3==0){
        print("fizz")
    } else if (i%%5==0) {
        print("buzz")
    } else {
        print(i)
    }
} 

但基本思路是合理的:首先解决特殊的“fizzbuzz”案例，然后处理剩余的(独家)案例。

这是前 16 个结果:

edd@max:~$ r /tmp/fizzbuzz.R | head -16
[1] 1
[1] 2
[1] "fizz"
[1] 4
[1] "buzz"
[1] "fizz"
[1] 7
[1] 8
[1] "fizz"
[1] "buzz"
[1] 11
[1] "fizz"
[1] 13
[1] 14
[1] "fizzbuzz"
[1] 16
edd@max:~$