R/praise.R

In Djeya/praiseme: Deliver Praise to Someone

#' Deliver Praise
#'
#' @description This function is super useful when you're feeling sad
#' and is useful for everyone.
#' @param name text string; This is the name 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 = "David", punctuation = "!")
praise <- function(name, punctuation = "!"){
  glue::glue("You're the best, {name}{punctuation}")
}

usethis::use_package("glue")
usethis::use_testthat()
usethis::use_test("praise")