R/first_element.R

In nicohuttmann/pOmics: Framework for proteomics data analysis

Defines functions first_element

Documented in first_element

#' Returns first element of vector
#'
#' @param x vector
#'
#' @return
#' @export
#'
#'
first_element <- function(x) {

  # Return first element
  return(x[1])

}