R/ga.capitalise.R

In UWAMEGFisheries/GlobalArchive: GlobalArchive

##  ----
#' Capitalise function
#'
#' Function to capitalise species names from \code{\link{GlobalArchive}}
#'
#' @param x column to be manipulated
#'
#' @return None
#'
#' @examples
#' ga.capitalise("tEst dATa")
#'
#' @export
ga.capitalise=function(x) paste0(toupper(substr(x, 1, 1)), tolower(substring(x, 2)))