R/test.R

In sangam998/hung:

#' A Cat Function
#'
#' This function allows you to express your love of catssssssss and birds.
#' @param love Do you love cats? Defaults to TRUE.
#' @keywords cats
#' @export
#' @examples
#' cat_function()

cat_functionn <- function(love=TRUE){
    if(love==TRUE){
        print("I love cats!")
    }
    else {
        print("I am not a cool person.")
    }
}