5 lines
103 B
R
5 lines
103 B
R
xx <- x <- 1:100
|
|
xx[x %% 3 == 0] <- "Fizz"
|
|
xx[x %% 5 == 0] <- "Buzz"
|
|
xx[x %% 15 == 0] <- "FizzBuzz"
|
|
xx
|