Lucid printing in R