R/functions.R

In ljcolling/red:

#' Say Colour
#'
#' This function says the colour.
#' What colour is says depends on the package.
#' If it's the blue package then it says 'blue'.
#' If it's the red package then it says 'red'.
#' @export
saycolour <- function(){
  cat("This is the 'saycolour()' function from the package: 'red'\n")
  colour = "red"
}