R/Capitalize.R

In alecmcclean/amtools: amtools

#' Capitalize
#'
#' This function capitalizes the first letter of a normal string
#' @param dataset Dataset to investigate
#' @keywords string, capitalize
#' @export
#' @examples
#' Capitalize()
Capitalize <- function(string) {
  paste0(
    toupper(substr(string, 1, 1)),
    substr(string, 2, nchar(string))
  )
}