#!/usr/bin/env Rscript
x = 1:100
x[seq(3,100,3)] = "Fizz"
x[seq(5,100,5)] = "Buzz"
x[seq(15,100,15)] = "FizzBuzz"
cat(x,"\n")