# <https://www.r-bloggers.com/paste-paste0-and-sprintf/> person <-"Grover" action <-"flying" message(sprintf("On %s I realized %s was...\n%s by the street", Sys.Date(), person, action))