R/some_functions.R

In johnmarquess/mytemplate: This is a latex template for making PDFs with knitr

#' Some dogs barking
#'
#' @param agree it is a dog?
#'
#' @return a loud barking noise, if it is a dog. Otherwise nothing.
#' @export
#'
#' @examples

dogs_over_cats <- function(agree = TRUE) {
    if (agree) {
        print("Woof!")
    } else {
        print("Nope")
    }
}