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