R/emu_function.R

Defines functions emu_function

Documented in emu_function

#' A function about emus
#'
#' What bird should you hug today? Find out here.
#' @param love Do you love emus? Defaults to TRUE
#' @keywords bird, flight
#' @export
#' @examples
#' emu_function()

emu_function <- function(love = T){
  if (love == T) {
    print ("Give a flightless bird a hug today.")
  }
  else {
    print ("Hug a raptor. Wear protective gloves.")
    }
  }
roopakrithi/rka1b documentation built on May 6, 2019, 5:03 p.m.