R/good_morning.R

In adsteen/classex:

##' Greets you in the morning
##' 
##' @param your.name A character vector containing a name
##' @param print.greeting Boolean, whether to print the greeting to console
##' @details This function greets you by name in the morning. It is pretty tough to come up with details to describe it.
##' @return A character vector
##' @export
##' 
good_morning <- function(your.name, print.greeting=FALSE) {
  greeting <- paste("Good morning,", your.name)
  
  # Print the greeting if specified
  if(print.greeting) {
    print(greeting)
  }
  
  greeting
}