RosettaCodeData/Task/FizzBuzz/R/fizzbuzz-1.r

xx <- x <- 1:100
xx[x %% 3 == 0] <- "Fizz"
xx[x %% 5 == 0] <- "Buzz"
xx[x %% 15 == 0] <- "FizzBuzz"
xx
Just another update 2015-02-20 00:35:01 -05:00			`xx <- x <- 1:100`
			`xx[x %% 3 == 0] <- "Fizz"`
			`xx[x %% 5 == 0] <- "Buzz"`
			`xx[x %% 15 == 0] <- "FizzBuzz"`
new files 2013-04-10 12:38:42 -07:00			`xx`