R/praise.R

In Monica-Wibowo/praiseme: Deliver Praise to Someone

#' Deliver phrase
#'
#' @description This function is super useful when you're feeling sad
#' and is useful for everyone.
#'
#' @param name text string; This is the na,e of the person I want to praise.
#' @param punctuation text string; This is our emphasis as a text input.
#'
#' @return Text string with praise
#' @export
#'
#' @examples
#' praise(name = "Thomas", punctuation = "!")
praise <- function(name, punctuation ="!"){
  glue::glue("You're the best, {name}{punctuation}")
  }
praise("Monica")