Create spamExemple.R